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

4 votes167 views1 answer
Excel vba how to reset usedrange
VBA
3 votes178 views1 answer
Vba post request json
VBA
0 vote196 views1 answer
Excel vba move down to next visible cell
VBA
0 vote179 views1 answer
How to get value from clipboard in vbnet
VBA
11 votes322 views1 answer
Excel vba How to URL encode a string
VBA
0 vote173 views1 answer
Vbnet check if sting contians symbols
VBA
0 vote158 views2 answers
Excel vba copy paste after last row
VBA
0 vote128 views1 answer
Vba code to remove leading and trailing spaces
VBA
0 vote178 views1 answer
Vba simple quote
VBA
0 vote175 views1 answer
Pivot data source not accepting table named range vba
VBA