摘要: Sub 启动定时任务() Application.OnTime TimeValue("17:16:00"), "定时递归运行" End Sub Sub 定时递归运行() ' 这是要运行的代码 MsgBox "宏已运行!" ' 设置下一次运行的时间,例如,每隔一天运行一次 Dim NextRunTim 阅读全文
posted @ 2023-10-31 17:19 vba是最好的语言 阅读(406) 评论(0) 推荐(0) 编辑