Comment faire pour lister les formulaires d'une base de données ?
Pour utiliser ce qui suit, vous avez besoin de savoir taper du code Visual Basic dans un module Access, compiler du code, et exécuter du code.
Pour lister les formulaires ouverts uniquement :
Tapez le code suivant dans un module quelconque :
Function ListeFormsOuverts() Dim frm As Form For Each frm In Forms Debug.Print frm.Name Next End Function
Pour tester, ouvrez la fenêtre de debugging, et tapez-y :
? ListeFormsOuverts() puis [ENTREE].
Pour lister tous les formulaires de la base :
Tapez le code suivant dans un module quelconque :
Function ListeForms() Dim db As Database, doc As Document Set db = CurrentDb For Each doc In db.Containers("Forms").Documents Debug.Print doc.Name Next Set db = Nothing End Function
Pour tester, ouvrez la fenêtre de debugging, et tapez-y :
? ListeForms() puis [ENTREE].