OnTimer Procedure to trigger Macro at intervals

[imported_unknown]

G'day ppl,

Does n e 1 know the correct procedure so as 2 get the TimerEvent 2 trigger every 30 mins or so.

I know I can use the Autosave, but it is limited and doesn't give me the result I need as I have 2 save 2 multiple locations.

I am aware of the OnTime Code to run a sub code at a given time of day, but that isn't enuf, I need it 2 repeat every 30 mins.

Sumthin like this:

Sub()
DoCmd.OnTimer 30000
Application.Run "SaveMyWorkBook"
End Sub.

N E suggestion or comments most welcomed.

TIA

Mark.

 

[Andrew Poulsom]

Use this method:

Application.OnTime Now + TimeValue("00:30:00"), "SaveMyWorkBook"

Put it in your Workbook_Open event procedure and again in your Workbook_BeforeSave event procedure.

 

[saint_2008]

help its not working correctly?

Im trying to get my workbook in excel to save it self evey 10min, I know it down as seconds at the bottom due to me trying to test it and to get it working, I dont have time to wait 10min between each one to test this. the 1st save works when I open my work book, but the 2nd save never happens?

How do I get it to keep repeating the code so it saves it evey so often?


This Workbook

Private Sub Workbook_Open()

Application.OnTime Now + TimeValue("00:00:10"), "SaveBook"

End Sub

Module1

Sub SaveBook()

ActiveWorkbook.Save

End Sub


Private Sub Workbook_BeforeSave()

Application.OnTime Now + TimeValue("00:00:10"), "SaveBook"

End Sub

Thanks for any help given