Исчезает все приложение (работает в фоновом режиме) вместо открытия рабочего листа «Лист1» в VBA - PullRequest
0 голосов
/ 29 января 2020

У меня есть 2 пользовательские формы. В userform1 лист для открытия выбирается вместе с некоторым текстовым полем. В Userform2 есть дополнительные поля параметров и командная кнопка для выгрузки Userform2 и активации рабочего листа 1, но он не загружается ... Я имел обыкновение запускать его, пока не добавил код, чтобы предложить пользователю заполнить поля ... нет конечно, что не так с моим кодом, что он больше не будет работать, больше не задавая форму листа

код пользовательской формы1:

Private Sub CommandButton1_Click()

If TextBox1.Value = "" Then
MsgBox "Pls. enter data"
Cancel = True
Exit Sub
End If

If Sheet1.Value = True Then
Unload UserForm1
UserForm2.Show

код пользовательской формы2:

*'to prompt user to complete fields*
Private Sub CommandButton1_Click()
If OptionBox1.Value = False And OptionBox2.Value = False Then
MsgBox "Pls. select option"
Cancel = True
Exit Sub
End If

*'to open worksheet "Sheet1"*
If UserForm1.Sheet1.Value = True Then
Worksheets("Sheet1").Activate
Application.Visible = True
Unload UserForm2
End If
End Sub

1 Ответ

0 голосов
/ 29 января 2020

Как только вы выгружаете UseForm1, он больше не доступен из UserForm2 - вместо этого вы должны Hide UserForm1, пока вы не покончили с ним, и только затем Unload it.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...