[問題]每3秒執行一次巨集

[nlzh (今晚吃朝)]

軟體: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://www.ptt.cc/bbs/Office/M.1531237980.A.ADE.html
→ newton41: For i= 1 To 10
→ newton41:
→ newton41: Application.Ontime Now+ i * TimeValue(“00:00:03” &
→ newton41:  ),"巨集"
→ newton41: Next i
→ nlzh: 感謝N大  已經成功了！