让Excel运行宏时弹出一个窗口，提示语句“请稍等”，当这个宏运行结束后自动关闭这个提示框。

Question

让Excel运行宏时弹出一个窗口，提示语句“请稍等”，当这个宏运行结束后自动关闭这个提示框。因为我这个宏程序运行起来要点时间，别人还以为卡住了，所以有必要有个提示框。这个提示框的程序怎么写？

Answer 1

你说的，我不会，不过，你可以将以下两句，放在代码的开始，与结束位置。

MsgBox "代码运行时间较长，请耐心等待！运行结束会有提示！！" & Chr(10) + Chr(13) & "单击“确定”，代码开始运行！", , "提示："
MsgBox "代码运行结束！！", , "提示："

Answer 2

可以设计一个窗体，窗体上设计个标签提示程序正在运行，在宏代码中用show方法激活窗体，宏代码最后一句再用代码关闭窗体。

Answer 3

Msgbox 不能在宏运行中一直保持前台，建议可以用Form窗体，把代码写在这里面就可以啦？追问

具体怎么做？

追答

1.改一下你的激活宏的方式。如下图一。
2.建一个userForm1窗体，
如下图二
3.编写窗体的代码！如下图三！

不会写的话可以将你的档案寄给我，我给你写……