我可以在宏运行时显示某些内容吗?

Mik*_*ike 4 vba word-vba

我有一个宏需要大约五秒钟来执行,我正在使用代码,Application.ScreenUpdating = False所以看起来Word在运行时已经锁定.

我在最后使用一个消息框告诉他们它是完整的,但我想在执行过程中显示一个图像告诉用户宏正在运行(主要是因为他们不会担心,但也因为它更好看着).

可能有一种更简单的方法,但我决定创建一个图像,创建一个非常基本的用户表单,并简单地将我的图像设置为其背景.然后,一旦代码开始运行,我就会弹出该用户表单.

我遇到的问题是,除非我关闭它,否则其余代码将不会执行.它只是挂起,直到我做某事.有没有办法让我可以在不停止其余流程的情况下显示用户表单?如果没有,是否有另一种方法可以在宏运行时显示图像?

Tim*_*ams 6

您可以将userform显示为非模态:

Userform1.Show False
'do more stuff (doesn't wait for form to close)
Userform1.Hide
Run Code Online (Sandbox Code Playgroud)