[请教] VBA定时执行某段代码

Question

请教高手，如何在一个按钮点击5秒钟后弹出一个MSGBOX？？？
在网上查了一下，发现用的是application.ontime我就在按钮响应里写如下代码：application.ontime now+timevalue("00:00:05"),  "TIP"在按钮相应下面写：sub tip
  msgbox  "ok"
end sub运行点就按钮，过了5秒钟弹出ok提示框,但是接着弹出错误提示 ： 未找到宏 “××××” !tip             (×××是指我的这个EXCEL路径和名称)
请教高手问题何在？？
谢谢～

Answer 1

你需要新建一个模块，把上面的代码放在这个模块里就可以了。
新建一个模块1，
Sub tip()
  MsgBox "ok"
  Application.OnTime Now + TimeValue("00:00:05"), "tip"
End Sub
这样就可以一直运行了。

Answer 2

哦 这样子啊
我用wait实现了 ：）