После повторного открытия функции, как я могу заставить его снова запустить мою пользовательскую форму?

Question

Таким образом, эта функция будет эффективно перезапускать мою рабочую книгу, однако, это не удар по моей пользовательской форме, которую я установил для открытия при открытии рабочей книги, и я не уверен, почему. Я не знаю, если это в обход этой функции или что...

Private Sub CommandButton3_Click()

Dim sPath As String
Dim sName As String
sName = ThisWorkbook.Name
sPath = ThisWorkbook.Path
ThisWorkbook.Saved = True
Workbooks.Open Filename:=sPath & "\" & sName

''''at a minimum I need this userform to show and it wont when i run this funtion.
UserForm1.Show

End Sub

Answer 1

Вы не можете открыть тот же файл, который у вас уже есть. Поэтому сначала нужно закрыть его, чтобы открыть снова. Это нарушает ваш код. так что это не сработает. Вы должны закрыть это.

Если вы хотите, чтобы ваша UserForm появлялась при запуске, просто поместите мой код в Workbook_Open, и он будет открываться при каждом запуске вашего файла.

Private Sub CommandButton3_Click()
'Vbmodal ensures that user need to interact with userform or discard it to select cells etc.
UserForm1.Show vbmodal

End Sub