请问大神，表格的宏功能中如何设置timer，定期运行一些脚本？VBA和JS都可以

#宏
GQF
GQF
背景：想在WPS表格中写一段宏，每隔1分钟，刷新一下表格中的数据，符合条件就弹窗提示，可是VBA和JS模式下都不太会设置timer 请问大神，表格的宏功能中如何设置timer，定期运行一些脚本？VBA和JS都可以，谢谢！
WPS表格 WPS表格 JS宏
北京
浏览 261
收藏
点赞
分享
+1
2
+1
全部评论 2
 
zzn
zzn
Dim RunTime As Date Dim Counter As Integer Sub ScheduleTask() RunTime = Now + TimeValue("00:00:05") ' 5秒后执行 ' 设置执行次数 Counter = 5 ' 调用指定的过程 Application.OnTime RunTime, "MyTask" End Sub Sub MyTask() ' 在此处编写定时任务的代码 MsgBox "定时任务执行了！剩余执行次数：" & Counter ' 减少剩余执行次数 Counter = Counter - 1 If Counter > 0 Then ' 设置下一次执行的时间 RunTime = Now + TimeValue("00:00:05") ' 5秒后执行 Application.OnTime RunTime, "MyTask" End If End Sub 不知道这个能不能实现你的需求
· 上海
回复
 
米斯特王
米斯特王

创作者俱乐部成员

请问你是wps本地表格还是智能表格，推荐用智能表格Airscript 可以做定时脚本
· 浙江省
回复