中断在Excel宏
您可以通过按Esc键或Ctrl + Break随时中断在Excel中的宏。
将工作表上的一个命令按钮并添加以下代码行:
Dim x As Long x = 5 Do While x > 2 x = x + 1 Loop
1.单击片材上的命令按钮。这个宏永远不会停止,因为后面的内容做,当“永远是真(x将总是比2更高)。
2.要阻止这种无限循环,按Esc键或Ctrl + Break。下面的对话框将出现:
3.单击结束结束宏,单击调试看看在Visual Basic编辑器宏。
4.在你的代码的开头添加以下代码行,如果你不想让你的程序的用户能够打断宏(不推荐)。
Application.EnableCancelKey = xlDisabled
5.尽管Excel在VBA宏结束自动xlInterrupt重置EnableCancelKey属性,这是很好的做法(使用以前的代码行时)结束与下面的代码行宏:
Application.EnableCancelKey = xlInterrupt
注意:如果Excel的冻结,不能进行中断您的宏了,按Ctrl + Alt + Delete并关闭Excel。