Liste des modules d’une base Access
Comment obtenir une liste des modules d’une base Access ?
Avant de démarrer
Cet article complète une série d’articles où il était question de lister les différents types d’objets d’une base de données Access. Voici la liste des articles précédents :
Modules
, au lieu du container Forms
, et à afficher tous les documents de ce container.
Lister toutes les modules 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 ListeModules() Dim db As DAO.Database, doc As DAO.Document Set db = CurrentDb For Each doc In db.Containers("Modules").Documents Debug.Print doc.Name Next Set db = Nothing End Function |
Pour tester, ouvrez la fenêtre Exécution, et tapez-y :
1 |
? ListeModules() |
et validez par[Entrée]
.
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.