Ontime run at a particular time

[Soonernut]

Can anyone show me how to change this to run lets say at 10:30 am?





You may want to play with Application.OnTime

Sub ScheduleMe()
Application.OnTime Now() + TimeValue("00:00:05"), "RunMe"
End Sub

Sub RunMe()
Beep
ScheduleMe
End Su

 

[Tom Ogilvy]

Sub ScheduleMe()
Application.OnTime TimeValue("10:30 AM"), "RunMe"
End Sub

Sub RunMe()
Beep
'ScheduleMe
End Sub

If you want each run to schedule another, then look at Chip Pearson's site

http://www.cpearson.com/excel/ontime.htm