Bonjour,
Je suis débutant sous access,
j'ai crée une requete me permettant de lister le nom des tables et des champs correspondants, cependant je n'arrive pas à récupérer les propriétés de ces champs (type de données, taille)
Ci-dessous la requête que j'utilise :
Private Sub Liste_TablesETChamps_Click()
Dim StrSql As String
Dim db As DAO.Database, tdf As DAO.TableDef, fld As DAO.Field
Dim strDescription As String
Set db = CurrentDb
On Error GoTo GestionErreur
For Each tdf In db.TableDefs
For Each fld In tdf.Fields
StrSql = "INSERT INTO 1_Liste_TablesChamps ( NomTable, NomChamp) values ('" & tdf.Name & "', '" & fld.Name & "');"
CurrentDb.Execute StrSql
Next fld
Next tdf
StrSql = ""
Set fld = Nothing
Set tdf = Nothing
Set db = Nothing
Help je m'arrache les cheveux !
pourriez vous me répondre en m'indiquant la syntaxe exacte à utiliser svp ?
Merci d'avance !
Partager