Code Snippets → How To Check If A Form Is Open (loaded)

' Substitute the real form name in the code where it says FORMNAMEHERE.

Currentproject.AllForms("FORMNAMEHERE").IsLoaded

' So, you can use this premade function if you want:

Function IsLoaded(strFormName As String) As Boolean
    IsLoaded = CurrentProject.AllForms(strFormName).IsLoaded
End Function

' And you can call it from a query, function, sub, etc. just by using

IsLoaded "FormNameHere"

' or

If IsLoaded("FormNameHere") Then

' ....etc.

End If