Autosave after idle error message

[ron9595]

I am attempting to have my file autosave after it is idle for a set amount of time, but not close. The function I am using is a common one found when searching on the web, but the problem is that after the idled save and someone attempts to re-activate the sheet by entering data or changing sheets I will receive the an "Run-Time error '1004':" message which says "Method 'OnTime' of object'_Application' failed" and it points me to line

Application.OnTime SchedSave, "SaveWork", , False

the codes that I am using are as follows:

in ThisWorkBook:

Please Login or Register  to view this content.

and in module1:

Please Login or Register  to view this content.

[shg]

You're trying to unschedule an event that has already occurred. Maybe ...

Please Login or Register  to view this content.

That's a very dangerous routine. If someone hoses the workbook and then goes to get a cup of coffee, their mistake will get immortalized.

[ron9595]

update.... autosave works perfectly, but it only runs one time. Can you modify macro to reset and run again after new activity? Like I said this file has been known to be open for days, so I need this to be repeatable. .

[shg]

Try changing bRun to Public and set it False in the Workbook_SheetChange event

[ron9595]

Still having problems. I can get autosave to work after a new entry, but it saves after "every" entry now. If someone enters two pieces of data 5 seconds apart, then 10 minutes from now the program saves twice 5 seconds apart. Could be an issue if someone enters 20 pieces of data, 10 minutes later it would be on a save loop until it reached 20 times!

[shg]

What's all the code now?

[ron9595]

I think I might have it now, or I am probably more correct in saying that I bypassed the problem. After numerous different versions of the code you supplied, I deleted them all and started over and inserted "On Error Resume Next" right after the "If tSave <> 0 Then" line, as this is the line that would supply an error whenever executing your macro. It might be a bandaid, but it works this way!