<Retour Grenier>

Début de page Question

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.

 

Début de page Réponse

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].