Timer abort

[rjplante]

I have a spreadsheet that I have set up an autosave timer using VBA (see code below). When I close the workbook the timer keeps running, and will open the workbook to resave the document if I have other spreadsheets open. How do I kill the timer when the workbook closes? I know I will add it to the ThisWorkbook code window, and use the before close option, but what is the line of code to abort the timer?

Tanks for the help.

Sub SaveThis()

Application.DisplayAlerts = False

ThisWorkbook.Save

Application.DisplayAlerts = True

Application.OnTime Now + TimeValue("00:05:00"), "SaveThis"

End Sub

 

[mole999]

your OnTime needs to be cancelled with your workbook close, as it will as you have discovered keep running continually, many references to code on here when you search for them

 

[rjplante]

Thanks, I have found a solution.