La collection Forms ne contient que les Forms chargées.
Il suffit donc d'en parcourir les éléments pour voir si la form en question s'y trouve ou non .
Public Function FormExists(byref vsName as String) as boolean
Dim oForm as Form
For Each oForm In Forms
If StrComp(oForm.Name, vsName, vbtextCompare) = 0 then
FormExists = True
Exit Function
End If
Next oForm
end function