Excel run macro every 5 minutes

Public RunWhen As Double
Public Const cRunWhat = "my_Procedure"

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 10, 0)
Application.OnTime earliesttime:=RunWhen, procedure:=cRunWhat, _
     schedule:=True
End Sub

Sub StopTimer()
   On Error Resume Next
   Application.OnTime earliesttime:=RunWhen, _
       procedure:=cRunWhat, schedule:=False
End Sub

Sub my_Procedure()
    MsgBox "hello world"
    Call StartTimer
End Sub

Source: stackoverflow.com

Similar codes

0 vote167 views1 answer
Change "location" of binding navigator vb
VBA
0 vote168 views1 answer
Quit excel with save changes dialog vb.net
VBA
0 vote178 views1 answer
Vba type
VBA
0 vote189 views1 answer
Thread sleep vb
VBA
0 vote189 views1 answer
How to get the value of optionbutton in vba
VBA
1 vote182 views1 answer
Excel vba How to determine if a date falls on the weekend?
VBA
1 vote161 views1 answer
Vba compile error object required
VBA
0 vote182 views1 answer
Label de tableau dans des label.text en VBA
VBA
2 votes184 views1 answer
Vba file from path
VBA
0 vote187 views1 answer
Vba code for cutoff time
VBA