скрытая рабочая тетрадь под пользователем form using excel vba

У меня есть рабочая книга по названию "архив", который я скрываю. При открытии книги пользовательская форма появляется и запрашивает пароль. Если введен правильный пароль, открывается другая форма. Проблема в том, что когда открывается форма пароля после нажатия на книгу, я не могу открыть какую-либо другую книгу. Кажется, что все книги скрыты, и они открываются только при вводе пароля. Код, который я использую:скрытая рабочая тетрадь под пользователем form using excel vba

Private Sub commandbutton2_click() 

If TextBox1.Value = "Secret" Then 
    MsgBox "Welcome", vbExclamation, "Access granted" 
    Me.Hide 
    UserForm1.Show 
Else 
    MsgBox "You have entered an incorrect password!" 
    Unload Me 
End If 

End Sub

источник

2016-09-05 Mbarack Saeed

у вас есть 'UserForm_Initialize()' для первой пользовательской формы? если да, то что у вас в нем –

Угадайте, что событие 'Workbook_Open' отображает форму пароля, но это просто предположение, поскольку у вас не было достаточно кода для воспроизведения проблемы. – Tim

Спасибо Shai за вас время и помощь, –

вы должны использовать vbModeless режимные

, то есть изменить код

Sub auto_open() 
    Application.Visible = False 
    UserForm2.Show 
End Sub

Sub auto_open() 
    Application.Visible = False 
    Windows("archive").Visible = False 
    UserForm2.Show vbModeless 
End Sub

это позволит вам открыть другие книги

источник

2016-09-06 07:26:19

Спасибо Арун, позвольте мне попробовать. –

Еще раз спасибо Аруну, он работает. Будьте здоровы. Теперь еще одна проблема. Если я открою другую книгу, она откроется вместе со скрытой книгой. –

try 'Windows (" archive "). Visible = False' –

скрытая рабочая тетрадь под пользователем form using excel vba

ответ

Смежные вопросы