Bonjour,
Je souhaiterai recuperer le nom du premier champs d'une table dynamiquement.
Pour l'instant je possède ce code qui me renvoi tous les champs d'une table donnée mais impossible de me restreindre a un champs
Voila merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Public Function NomDeChamps(NomDeTable As String) As String Dim Db As DAO.Database Dim tbd As DAO.TableDef Dim fld As DAO.Field Set Db = CurrentDb Set tbd = Db.TableDefs(NomDeTable) For Each fld In tbd.Fields MsgBox "Table : " & tbd.Name & " Colonne : " & fld.Name Next End Function![]()
Partager