UserForm в состоянии Show или Hide?

[transgd]

Доброе время суток!
Вопрос:
Есть-ли в VBA функция, определяющая запущена форма (Show) или скрыта (Hide)?

[doober]

Посмотрите здесь

[IgorGO]

косметическое уточнение:

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Function Forms_Open(Caption As String) As Boolean
  Forms_Open = FindWindow("thunderDFrame", Caption) <> 0
End Function

[Алексей Трошкин]

Может не ответ на вопрос, но информация к размышлению

[Aent]

Если пользовательская форма отображается её свойство .Visible = True,
если форма скрыта .Visible = False

[transgd]

Извините за запоздалый ответ, так уж сложилось...
Спасибо.
Предложенный вами вариант конечно-же должен работать.
Буду пробовать, если будут затруднения, прошу откликнуться.
О результатах напишу...

[transgd]

Предложенный вами вариант хорошо работает, если запускаемые формы находятся в одной книге.
А когда проверяется форма, запущенная из другой книги, то почему-то не работает.

[doober]

Этого не может быть.для предложеной функции все равно откуда запущена форма,она опознает форму по Caption.Сейчас проверил.работает все правилно и из других книг запущеные формы видит.Запустите основную и любые остальные и проверяйте

[transgd]

А назначать и располагать саму функцию достаточно в одной форме?

[transgd]

Извините, конечно-же назначать эту функцию необходимо не в форме а в модуле.
Еще раз, вопрос: назначать эту функцию нужно в стандартном модуле одной книге или в обоих книгах (у меня их может быть несколько)?