Use IsLoaded to Check for Forms

The IsLoaded function tests to determine if any instances of a form are already loaded or exist in memory:

 If IsLoaded("frmMyForm") Then	Debug.Print "frmMyForm is loaded"End IfPublic Function IsLoaded(sForm As String)	Dim Frm As Form	For Each Frm In Forms		If Frm.Name = sForm Then			IsLoaded = True			Exit For		End If	NextEnd Function
Share the Post:
Share on facebook
Share on twitter
Share on linkedin

Overview

Recent Articles: