У меня есть 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