Un code VBA pour récupérer un type de donnée ?

J'ai supprimé la partie du code suivante :

Code:

---

parcourt.Name = lfNameTbl

---

mais cela n'a rien changé au problème ...

Vous auriez une solution ?

Salut,

J'ai également soumis ce problème dans le forum VB mais aucun membre n'a pu m'apporter de réponses ...

Vous pouvez m'aidez ? :help:

Bonjour,

Je ne sais pas si tu as eu ta réponse depuis le temps, et j'espère que tu l'as eu. Sinon, voilà une autre piste.

Tu as déclaré ta fonction sans type de retour :

Code:

---

Function lf_GetTypeField(lfNameTbl As String, lfNameFld As String)

---

Donc quand tu lui assignes une valeur, avec la ligne :

Code:

---

lf_GetTypeField = tbl.Fields(lfNameFld).Type ' renvoie le type de champ

---

Access n'en n'attendant pas, il t'affiche un message d'erreur.