Discussion :

[JockdiL]

Bonjour,
j'aimerais savoir s'il y a un moyen pour récupérer les noms des tables d'une base Access.
Merci.

[pgz]

Bonjour.

L'idée générale :
cocher la référence MS ACCESS
déclarer un objet database
instancier l'objet en ouvrant la base (OpenDataBase)
la collection Tabledefs de l'objet database contient toutes les tables
parcourir la collection et lire la propriété .name de chaque table.

Si la base est protégée par mot de passe, il faut le connaître.

Bon courage,

PGZ

[cafeine]

Hello,

c'est facile en ajoutant la référence à DAO :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
dim db as dao.database
dim tb as dao.tabledef
 
set db=dao.opendatabase("chemindelabase.mdb",false,false)
for each tb in db.tabledefs
   msgbox tb.name
next tb
 
set tb=nothing
set db=nothing

[ouskel'n'or]

Je vais déplacer cette discussion sur VBA-Excel. Je laisse juste le temps à moimemessssssssss de venir voir, j'ai mis un lien qui devrait le conduire ici.