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 vote327 views1 answer
How to format a textbox as date vb net
VBA
1 vote313 views1 answer
How to INPUT text in shape with enter and spacein vba
VBA
0 vote297 views1 answer
Vbnet display all axis labels in cahrt
VBA
0 vote303 views1 answer
Sendkeys vba selenium
VBA
0 vote296 views1 answer
Le contrôle SpinButton (Toupie)
VBA
3 votes325 views1 answer
Excel insert blank row for value change in column
VBA
4 votes323 views2 answers
Vba last row
VBA
0 vote330 views1 answer
Open file dialog in vb.net
VBA
0 vote319 views1 answer
Send text to clipboard vb.net
VBA
2 votes305 views1 answer
Vba round number
VBA