Application.OnTime running only once?

[sark666]

I have the following sub in the ThisWorkbook section:

Private Sub Workbook_Open()
    Application.OnTime TimeValue("03:00:00"), "START_procedure"
    
End Sub

I want it to run every day at 3 am. But it's running only once.

Hmm, I think I see my problem, under the thisWorkbook it's under workbook and Open so obviously it's only excuting once upon opening. Should I just have it as (General) (Declarations) ?

Does an application.OnTime macro even need to be in ThisWorkbook section? I thought I had read in a tutorial to set it up like that but I may be mistaken.

 

[VoG]

The open code sets a timer in Excel to run your macro. Without that it wouldn't run (except manually).

When your macro runs it (invisibly to you) deletes the original timer then sets a new timer to run itself at a specified time. The next time it runs, the same thing happens. This repeats unless you cancel the timer (see the link) or close Excel.

 

[prajul89]

Sub test()
MsgBox "SEE"
Application.OnTime Now + TimeValue("00:00:05"), "test"
End Sub

Try this and you will be convinced. It will run every 5 secounds.

 

[sark666]

I got it. That makes sense! thanks to all of you.

 

[dma115566]

Sub test()
MsgBox "SEE"
Application.OnTime Now + TimeValue("00:00:05"), "test"
End Sub

Try this and you will be convinced. It will run every 5 secounds.

hi Prajul,

does this also work if i want to run the macro serveral times a day, everyday ?