Réponse acceptée !
Salut!
Je ne sais pas quelle mode de connection a DB tu utilises.
Voila le code pour DAO
La connection doit etre deja faite
dim tdf As TableDef, fld As Field
Set tdf = db.TableDefs(TableName$)
Set fld = tdf.CreateField(FieldName$, FieldType)
tdf.Fields.Append fld
Ou on peut uliliser SQL-requete
dbs.Execute "ALTER TABLE TonTable ADD COLUMN TonFild vbDataType"