Is there a way to interrupt "Ontime" macro once it is started?

[Carl]

I have a macro that saves the workbook 30 minutes after opening using
"OnTime". Is there a way to stop this once it has started? I know one way is
to close and reopen the workbook and Excel but is there a way to do it
without having to close the workbook? Thanks in advance.

 

[Jim Thomlinson]

Nope... the best you will do is to pop a mesage for the user warning them of
the save...

if msgbox("Do you wanna save???", vbyesno) = vbyes then thisworkbook.save

 

[Carl]

Thanks, Jim. I was afraid this would be the case.

 

[Peter T]

If you mean abort a scheduled Ontime before it's occurred, store the
'EarliestTime' and set the optional Schedule to false, eg

Sub myOnTime(bRun As Boolean)
Static tme As Date ' or at module level
If bRun Then
tme = Now + TimeSerial(0, 0, 5) ' 5 sec's from now
End If
Application.OnTime tme, "myMacro", schedule:=bRun

End Sub

Regards,
Peter T

 

[Jim Cone]

Well, maybe...
http://www.cpearson.com/excel/ontime.htm
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware


"Carl"
<[email protected]>
wrote in message
Thanks, Jim. I was afraid this would be the case.

 

[Dave Peterson]

Chip Pearson has lots of instructions at:
http://www.cpearson.com/excel/ontime.htm

 

[Carl]

Thanks to all for the great information!

Chip Pearson has lots of instructions at:
http://www.cpearson.com/excel/ontime.htm