Compléments pour Microsoft Access

http://access.fr.free.fr/

Fermer tous les form (Formulaire)

Description 

Cette fonction permet de fermer tous les formuaires ouverts de la base de données en cours.

 
Synthaxe 

CloseAllForm()

 
Exemple 

Aucun exemple disponible pour le moment.

 
Code de la fonction 


 

Function CloseAllForm()

Dim intForm As Integer
For intForm = 0 To Forms.Count - 1
    DoCmd.Close acForm, Forms(0).Name, acSaveYes
Next

End Function