用“X”closures用户窗体并退出Excel

我正在创build一个用户窗体，我希望用户通过拐angular处的“X”closures用户窗体，这样我就可以closures/退出Excel。 我试了UserForm_Deactivate（），但它不工作或调用“X”时按UserForm_Deactivate（）。 这里是代码

Private Sub UserForm_Deactivate() Application.Quit End Sub 

我也尝试了工作簿（1）。closures和ActiveWorkbook.Close，没有工作。

我的用户表单是由“Organizador”命名的，我不知道是否因为我尝试了Organizador_Deactivate（）而没有任何区别，什么也没有发生。

提前致谢

Answer 1

你需要使用UserForm_Terminate（）

Answer 2

另外，如果你把“End”放在“Application.Quit”的地方，它将会停止程序，并且不会在后台没有完全执行的情况下继续运行额外的命令，特别是如果你在“Private Subs”中使用“If”会看起来像这样

 Private Sub UserForm_Terminate() End End Sub