Changer type de donnée ACCESS en VBA

[kevin1030]

Bonjour,

A la suite d'un code VBA permettant d'importer automatique une feuille Excel dans ACCESS, je souhaiterais modifier le type d'un champ de cette table une fois importée.

Voici le code VBA d'import de la feuille Excel nommée "DATA":

GenericFunctions.DeleteTable ("DATA")
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "DATA", strFilePath & "DATA.xls", True, "DATA"

Et alors dans cette nouvelle table Access je voudrais modifier le type de champ DATA.champ1 qui est "number" par défaut en "Text" de façon automatique en VBA.

Merci d'avance de votre aide.

 

[Guest]

Re : Changer type de donnée ACCESS en VBA

Bonjour,

La table ne doit pas être ouverte.

DoCmd.SetWarnings True
DoCmd.RunSQL "ALTER TABLE DATA ALTER COLUMN Champ1 TEXT(30)"

A+