作者nlzh (今晚吃朝)
看板Office
标题[问题]每3秒执行一次巨集
时间Tue Jul 10 23:52:58 2018
软体:Excel
版本:2016
请问要如何利用vba写出每3秒执行一次巨集呢?
我的想法是执行test後会每隔3秒执行一次"巨集"，直到执行10次结束
下面是我打的程式
Sub test()
For i= 1 To 10
Application.Ontime Now+TimeValue("00:00:03),"巨集"
Next i
End sub
但执行test会变成3秒後执行10次"巨集"
并不是我所想的这样
爬文後还是不知道该如何改
希望版上的前辈指点 谢谢!
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 110.50.151.58
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1531237980.A.ADE.html
1F：→ newton41: For i= 1 To 10 07/11 00:01
2F：→ newton41: 07/11 00:01
3F：→ newton41: Application.Ontime Now+ i * TimeValue(“00:00:03” & 07/11 00:01
4F：→ newton41: ),"巨集" 07/11 00:02
5F：→ newton41: Next i 07/11 00:02
6F：→ nlzh: 感谢N大 已经成功了！ 07/11 14:21