Discussion :

[Misha]

Bonjour,

Voila mon problème :

J'ai besoin de récupérer dans une zone de liste déroulante (lstChamps) la liste des champs d'une table que je sélectionne dans une autre liste déroulante (lstTable).

J'ai trouvé ce code dans les FAQ mais je ne sais pas comment dire qu'il faut ajouter la liste des champs à partir de la tablé sélectionné dans lstTable.

Public Sub test()

Dim Db As DAO.Database
Dim tbd As DAO.TableDef
Dim fld As DAO.Field
Set Db=CurrentDb
For Each tbd In Db.TableDefs

For Each fld In tbd.Fields
MsgBox "Table : " & tbd.Name & " Colonne : " & fld.Name
Next

Next

End Sub

Merci d'avance à ceux qui répondront.

[loufab]

Bonjour,

Regarde dans le mon tuto sur la recherche (1ere partie) il fonctionne de cette manière.

Cordialement,

[Misha]

Bonjour, merci pour le tutoriel, il est bien expliqué et clair. Très facile à suivre.

En tout cas cela m'a bien dépanné.

Encore merci d'avoir répondu.