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 vote342 views1 answer
Excel vba round to whole number
VBA
0 vote333 views1 answer
Vba type variable
VBA
12 votes460 views1 answer
Excel vba write string to text file
VBA
0 vote342 views1 answer
Arq linux
VBA
1 vote337 views1 answer
Vba delete file
VBA
-1 vote308 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA
0 vote352 views1 answer
Vba array dimensions
VBA
1 vote336 views1 answer
Vba date to unix timestamp
VBA
3 votes341 views1 answer
Excel vba get the workbook full file name with path
VBA
1 vote329 views1 answer
Sort using vba
VBA