Formular in Access geöffnet

Ob ein Formular in einer laufenden Access-Anwendung geöffnet ist? So bekommen man es per VBA heraus:

Function IstGeladen(MeinFormular As String) As Boolean

Dim I As Integer
IstGeladen = False
For I = 0 To Forms.Count – 1
If Forms(I).FormName = MeinFormular Then
IstGeladen = True
Exit Function
End If
Next I

End Function