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 vote161 views1 answer
Priavte sub with multiple handels find sneder
VBA
0 vote191 views1 answer
Vba random number
VBA
0 vote174 views1 answer
Vba check 32 or 64 bit
VBA
4 votes159 views1 answer
Excel vba how to reset usedrange
VBA
0 vote164 views1 answer
Vba file size
VBA
6 votes177 views1 answer
Excel vba isalpha
VBA
0 vote167 views1 answer
Returns an array from function vba
VBA
0 vote175 views1 answer
Vbs
VBA
3 votes216 views1 answer
Vba continue for each loop
VBA
0 vote160 views1 answer
Vba option button selected
VBA