Bonjour à tous,

Je veux créer un champ dans une table en passant par un formulaire.

Dans ce formulaire j'ai 2 zones : strNomDuChamp (Zone de Texte) et ListeType (Zone de liste déroulante rattachée à une table qui contient deux champs).

J'ai aussi un bouton avec notamment le code ci-dessous qui est rattaché :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Set MonChamp = MaTable.CreateField(Me.strNomChamp, Me.ListeType)
La partie Me.strNomChamp fonctionne sans problème mais pas Me.ListeType...

Pourtant quand je mets un :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
MsgBox Me.ListeType
il me met bien la valeur que je souhaite (c'est à dire : dbBoolean ou dbInteger par exemple) mais ensuite le code Set MonChamp provoque un avertissement Erreur d'exécution '3421'.

J'avoue que je ne comprends pas pourquoi ?

Oliv'