用“X”关闭Userform并退出Excel

Question

我正在创建一个Userform，我希望用户通过＆＃34; X＆＃34;来关闭用户表单。在角落里，通过这样做，我希望Excel关闭/退出。 我尝试了UserForm_Deactivate（），但它没有工作或调用UserForm_Deactivate（）时＆＃34; X＆＃34;被压了。这是代码。

Private Sub UserForm_Deactivate()
   Application.Quit
End Sub

我也试过工作簿（1）。关闭和ActiveWorkbook.Close，没有用。

我的用户形式由＆＃34; Organizador＆＃34;命名，我不知道它是否因为我尝试了Organizador_Deactivate（）并且没有任何反应而产生任何差异。

提前致谢

Answer 1

您需要使用UserForm_Terminate（）

Answer 2

此外，如果你把＆＃34;结束＆＃34;代替＆＃34; Application.Quit＆＃34;它将停止程序并且不会继续在后台运行未完全完成的额外命令，特别是如果您使用＆＃34;如果＆＃34;功能跨越＆＃34;私有子＆＃34;所以它看起来像这样

Private Sub UserForm_Terminate()
    End
End Sub