سلام
یه مقدار هم خودتون بررسی کنید
کد بالا رو هم با نام فرم خودتون و هم با همین کد تست کنید
در ادامه بعد از then هم باید کاری که قراره انجام بشه رو بیارید
مثلا
If CurrentProject.AllForms("myform1").IsLoaded = true Then
msgbox "فرم باز است"
else
msgbox "فرم بسته است"
endif
بجای مسیج هر عملکردی لازم دارید قرار بدین
ضمنا
else الزامی نیست