application.ontime

[Guest]

I have a simple routine that schedules several subroutines to run durin the
day.
Sub aaatest99()
Application.OnTime TimeValue("07:59:50"), "aaaget800val"
Application.OnTime TimeValue("08:59:50"), "aaaget900val"
Application.OnTime TimeValue("09:59:50"), "aaaget1000val"
end sub

If I open excel, and run this routine. Then close excel, and re-open excel
and re-run this routine... it appears that the subroutines are scheduled to
run again, at the specified times. So that they will run twice, ie. the
sceduled running of the subroutine was not cancelled when I closed excel.

How exactly does Application.OnTime work?
thanks, Rick
(e-mail address removed)

 

[Tom Ogilvy]

when you close excel, the scheduled activities are cancelled to the best of
my knowledge. Perhaps your code is recursive.

 

[Bernie Deitrick]

Rick,

Cancel prior to scheduling:

Sub aaatest99()
On Error Resume NExt
Application.OnTime TimeValue("07:59:50"), "aaaget800val", schedule:=False
Application.OnTime TimeValue("08:59:50"), "aaaget900val", schedule:=False
Application.OnTime TimeValue("09:59:50"), "aaaget1000val", schedule:=False
Application.OnTime TimeValue("07:59:50"), "aaaget800val"
Application.OnTime TimeValue("08:59:50"), "aaaget900val"
Application.OnTime TimeValue("09:59:50"), "aaaget1000val"
end sub

HTH,
Bernie
MS Excel MVP