所以这个功能将有效地重新启动我的工作簿,但是,它不是踢我的用户表单,我已经设置为在工作簿打开时打开,我不确定为什么。我不知道它是不是绕过了那个功能。
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
发布于 2018-08-20 01:43:45
您不能打开已处于活动状态的同一文件。因此,您需要先将其关闭才能再次打开它。它破坏了你的代码。所以它不会起作用。你得把它关上。
如果你想让你的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
https://stackoverflow.com/questions/51914300
复制相似问题