Format Champs par VBA

Bonjour,

J'ai un bout de code qui me rajoute des champs à une table.
J'arrive à rajouter ce champs en text et en numèrique.

Set fld = tdf.CreateField(Badg, dbInteger, 55)

J'aimerais avoir la syntaxe des autres formats, par exemple le pourcentage le numAuto...

Merci