Schedule Macro doesn't seem to run any suggestions

[jk9533]

Below is a scheduled macro to run everyday at 5:00 am. It doesn't seem to be
working. Does anybody know how to fix?

Sub Schedule()
Application.OnTime EarliestTime:=TimeValue("5:00 AM"),
Procedure:="RefreshDaily", Schedule:=True
End Sub

Thanks

 

[garys_student]

Below is a scheduled macro to run everyday at 5:00 am.  It doesn't seemto be
working.  Does anybody know how to fix?

Sub Schedule()
    Application.OnTime EarliestTime:=TimeValue("5:00 AM"),
Procedure:="RefreshDaily", Schedule:=True
End Sub

Thanks

You need the date as well as the time:
Application.OnTime EarliestTime:=Date + TimeSerial(5, 0, 0) + 1
will schedule the next run tomorrow

gsnu2007k

 

[jk9533]

To have it run everyday do I still need the "+1"

You need the date as well as the time:
Application.OnTime EarliestTime:=Date + TimeSerial(5, 0, 0) + 1
will schedule the next run tomorrow

gsnu2007k

 

[garys_student]

If you include the line in RefreshDaily, It schedules the next entry
for tomorrow.

So the +1 is necessary!