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 vote233 views1 answer
Vbs
VBA
0 vote248 views1 answer
Vba round to 2 decimals
VBA
0 vote248 views1 answer
Method showalldata of object _worksheet failed vba
VBA
0 vote218 views1 answer
Add items to combobox vb.net
VBA
0 vote246 views1 answer
Vba search string position
VBA
1 vote240 views1 answer
How to remove zeros in excel
VBA
8 votes539 views1 answer
Excel vba make word from bytes
VBA
18 votes576 views2 answers
Vba make word from bytes
VBA
0 vote212 views1 answer
Excel protect cells with formulas
VBA
0 vote218 views1 answer
Vb net check if file exists
VBA