Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Nom des champs

Nom des champs

2 réponses
Avatar
Nono
Salut =E0 tous,

est-il possible de r=E9cup=E9rer les noms de champs d'une=20
table via une requete SQL ???

Sinon, pouvez-vous m'indiquer la marche =E0 suivre pour=20
r=E9cup=E9rer ces noms de champs =E0 partir de code ?

Merci =E0 tous


NONO
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Xavier HUE
Bonjour Nono,

Sub ListerChampTable(strNomTable As String)
Dim db As DAO.Database
Dim tbl As DAO.TableDef
Dim fld As DAO.Field

Set db = CurrentDb
Set tbl = db.TableDefs(strNomTable)

For Each fld In tbl.Fields
Debug.Print fld.Name
Next fld
End Sub

Cordialement.
-----Message d'origine-----
Salut à tous,

est-il possible de récupérer les noms de champs d'une
table via une requete SQL ???

Sinon, pouvez-vous m'indiquer la marche à suivre pour
récupérer ces noms de champs à partir de code ?

Merci à tous


NONO
.



Avatar
Merci Beaucoup !!
-----Message d'origine-----
Bonjour Nono,

Sub ListerChampTable(strNomTable As String)
Dim db As DAO.Database
Dim tbl As DAO.TableDef
Dim fld As DAO.Field

Set db = CurrentDb
Set tbl = db.TableDefs(strNomTable)

For Each fld In tbl.Fields
Debug.Print fld.Name
Next fld
End Sub

Cordialement.
-----Message d'origine-----
Salut à tous,

est-il possible de récupérer les noms de champs d'une
table via une requete SQL ???

Sinon, pouvez-vous m'indiquer la marche à suivre pour
récupérer ces noms de champs à partir de code ?

Merci à tous


NONO
.

.