VBA загружена форма
If CurrentProject.AllForms("FormName").IsLoaded Then
' Form is open
Else
' Form is closed
Endif
Saphirah
If CurrentProject.AllForms("FormName").IsLoaded Then
' Form is open
Else
' Form is closed
Endif