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 vote136 views2 answers
Vb.net include quotes in string
VBA
0 vote117 views1 answer
Prive sub enter clicked vb
VBA
13 votes169 views2 answers
Vba write text file
VBA
0 vote121 views1 answer
Excel vba show developer tab
VBA
0 vote119 views1 answer
Vba loop through textboxes
VBA
2 votes142 views2 answers
Excel vba if sunday or staurday
VBA
0 vote128 views1 answer
Vbnet revrese the order of character in string
VBA
0 vote116 views1 answer
Excel vba copy range with filter
VBA
0 vote119 views1 answer
Dynamically change drop down list visual basic
VBA
0 vote123 views1 answer
Type excel.application is not defined vb
VBA