ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   application.ontime (https://www.excelbanter.com/excel-programming/335452-application-ontime.html)

Rick

application.ontime
 
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


Tom Ogilvy

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

--
Regards,
Tom Ogilvy

"rick" wrote in message
...
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




Bernie Deitrick

application.ontime
 
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


"rick" wrote in message
...
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





All times are GMT +1. The time now is 01:43 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com