-
If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.
file save
- Thread starter ashtod1
- Start date
erik.van.geit
MrExcel MVP
- Joined
- Feb 1, 2003
- Messages
- 17,832
Hello, ashtod1,
so you want more then the autosave for recovery in case of problems ?
would this do ?
in the workbookmodule
"normal module"
this will save the workbook each 300 seconds
kind regards,
Erik
so you want more then the autosave for recovery in case of problems ?
would this do ?
in the workbookmodule
Code:
Option Explicit
Private Sub Workbook_Open()
sec = 300
Run "do_something"
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Run "stop_it"
End Sub
Code:
Option Explicit
Public sec As Integer
Public when As Variant
Sub do_something()
when = Now + sec / 60 / 60 / 24
Application.OnTime when, "do_something"
ThisWorkbook.Save
End Sub
Private Sub stop_it()
Application.OnTime EarliestTime:=when, Procedure:="do_something", schedule:=False
End Subkind regards,
Erik
Upvote
0
erik.van.geit
MrExcel MVP
- Joined
- Feb 1, 2003
- Messages
- 17,832
of course
did you look for SaveAs somewhere ?
shouldn't be to difficult to find it in the helpfiles or here on the board
Upvote
0
