Auto save

[Dennis]

I need help how to save a shared workbook to another folder at a specified
time of the day (like everyday at 5 PM )

Thank you
Dennis

 

[Nick Hodge]

Dennis

I would be cautious with this as I hate shared workbooks, but... You could
set an Workbook_Open() event and use

Private Sub Workbook_Open()
Application.OnTime TimeValue("17:00"), "saveattime"
End Sub

This goes in the ThisWorkbook module and this goes in a standard module

Sub saveattime()
ThisWorkbook.SaveAs "C:\Newname.xls"
End Sub

One runs the other, but I would do a great deal of testing, particularly if
many people will be using it at 5:00pm

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
(e-mail address removed)

 

[Dennis]

Thank you, Nick. It would be a great help. This will make sure the data
entered by users in one day can be analyzed the next morning without being
interfered by the new data entered that morning.
Thanks again
Dennis