for each frm in Userforms
if lcase(frm.name) = "frmabc" then
' frm is loaded
if frm.visible then
' frm is visible
end if
end if
Next

Obviously if the useform isn't loaded, then it can't be visible.

--
Regards,
Tom Ogilvy


"Excel 2003 - SPB" wrote:

I am trying to find code for indentifying if a user form is open

Thanks

SPB