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 vote153 views1 answer
Excel vba automatic calculation
VBA
1 vote143 views1 answer
Excel vba make cell visible
VBA
0 vote146 views1 answer
Vbscript abs
VBA
0 vote145 views1 answer
Vbnet check if string is only symbols
VBA
0 vote143 views1 answer
Vbnet line graph smooth lines
VBA
0 vote184 views1 answer
Vbnet check if string is only letters
VBA
0 vote153 views1 answer
Priavte sub with multiple handels find sneder
VBA
0 vote155 views1 answer
Vba exit while
VBA
4 votes142 views1 answer
Excel formula for last non-empty cell in a column
VBA
5 votes150 views1 answer
Xl vba double quotes in string literal
VBA