Sub 定时运行程序()
MsgBox "单击确定按钮,5s后运行 Main 函数", vbOKOnly, "定时运行程序"
Application.OnTime Now + TimeValue("00:00:05"), "Main" '定时5s
End Sub
Sub Main()
MsgBox "此时正在运行 Main", vbOKOnly, "定时运行程序" '设置运行提示
End Sub
【VBA】VBA定时运行程序
最新推荐文章于 2025-03-23 11:07:29 发布