Страницы: 1
RSS
Проверка существования UserForm
 
Доброго времени суток!!!
Возникла необходимость в проверке наличия формы. Не могу придумать при помощи какого свойства или метода это сделать.
 
Проверить ошибку при вызове формы.
 
При повторном отображении формы не появляется ошибка или что значит "вызов формы"?
 
Цитата
необходимость в проверке наличия формы... При повторном отображении формы
Вы уж определитесь, есть форма или ее нет. Кака это: повторное отображение, если формы нет?
 
Цитата
vikttur написал: Кака это: повторное отображение, если формы нет?
Я ее не вызываю отдельно, а сразу показываю, вот мне надо узнать не закрыли ли ее вручную.
Я писал, что мне надо проверить на наличие формы, а не на отсутствие.
 
Проверка наличия формы: проверить, есть ли форма в проекте. Как еще можно было понять предложение?
 
Наверно вы правы. Мне нужно проверить не показана ли форма.
 
При открытии формы ставить какой-либо флаг (в ячейке, в имени)
 
Код
Public frmtmp As Object
Private Sub UserForm_Click()
    If Not frmtmp Is Nothing Then MsgBox "qq"
End Sub

Private Sub UserForm_Initialize()
    Set frmtmp = Me
End Sub
 
Сергей Беляев, чем не подходит свойство ИмяФормы.Visible?
 
If IsObject(UserForm1) Then UserForm1.Show Else MsgBox "Нет такой формы"
Страницы: 1
Читают тему
Наверх