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 vote228 views1 answer
Excel vba delete columns in range
VBA
1 vote133 views1 answer
Ms access open form to new record
VBA
0 vote175 views1 answer
Vba createparameter null
VBA
0 vote179 views1 answer
Xlbycolumns is not declared
VBA
-1 vote208 views1 answer
Code for reading letters only in vb 6
VBA
0 vote188 views1 answer
Vba copy file
VBA
1 vote191 views1 answer
Vb.net get name by Cell Click
VBA
0 vote190 views1 answer
Find control with name vb
VBA
3 votes229 views1 answer
Vba continue for each loop
VBA
0 vote172 views1 answer
Visual basic msdos
VBA