Liste des états d’une base Access
Comment obtenir une liste des états d’une base Access ?
Avant de démarrer
Cet article complète une série d’articles où il était question de lister les tables, les requêtes et les formulaires de la base de données. Je relance un peu cette série suite à une question posée sur le forum Access. Voici la liste des articles précédents :
Reports
, au lieu du container Forms
, et à afficher tous les documents de ce container.
Lister tous les états de la base de données
Tapez le code suivant dans un module quelconque :
1 2 3 4 5 6 7 8 9 10 |
Function ListeEtats() Dim db As DAO.Database, doc As DAO.Document Set db = CurrentDb For Each doc In db.Containers("Reports").Documents Debug.Print doc.Name Next Set db = Nothing End Function |
Pour tester, ouvrez la fenêtre Exécution, et tapez-y :
1 |
? ListeEtats() |
et validez par[Entrée]
.
Dans l’article Liste des tables – Version 2, vous trouverez un exemple plus élaboré pour l’exploitation des tables (à adapter aux états).
L’exemple de code ci-dessus fait appel à la bibliothèque DAO (Microsoft DAO Object Library). Cette bibliothèque doit être associée à votre base de données pour que le programme fonctionne.Pour plus de détails sur les références, consultez cette page.