关于excel的vba 如何实现用宏来打开一个窗体,三秒后再自动关闭这个窗体

我这么写
sub aa()
userform1.show
msgbox " i will shutdown "
userform1.hide
end sub
我执行该宏后先弹出一个窗体,只有我关闭该窗体,才开始msgbox
能不能帮我,不用手动关闭窗体就可以弹出msgbox呢?

第1个回答  2012-04-09
Sub aa()
Dim SetTime As Date
UserForm1.Show
SetTime = DateAdd("s", 3, Now())
Application.Wait SetTime
UserForm1.Hide
MsgBox " i will shutdown "
End Sub
相似回答