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 vote212 views1 answer
Vb.net change cursor to wait
VBA
0 vote264 views1 answer
Vba line feed
VBA
0 vote202 views1 answer
Excel vba current folder
VBA
0 vote208 views1 answer
Rotate image by any angle vb.net
VBA
3 votes217 views1 answer
Excel insert blank row for value change in column
VBA
0 vote236 views1 answer
If statement vdhl
VBA
4 votes226 views1 answer
VBA Deep Clone Dictionary
VBA
0 vote214 views1 answer
Vba clear collection
VBA
0 vote215 views1 answer
Vba check if class implements interface
VBA
0 vote221 views1 answer
Regex numeric digits
VBA