在运行代码时使表单响应

Question

主动运行脚本时，表单窗口无响应。我想做的是能够在运行脚本（正在发送电子邮件）的同时仍然使用该窗口，以便在我觉得有问题时可以取消操作。我该怎么做呢？

编辑：How to stop VBA code running? +使用DoEvents调用使窗口能够响应，因此设置了可以取消操作的标志。