Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Automatically save a copy of worksheet from C: to Network Drive
I have a spreadsheet that I work on my C: drive that I need to have a copy
automatically saved (undated everytime I make changes) on a network drive so my boss can access it when she needs to review it. Can I do this? |
#2
|
|||
|
|||
doos
VBA macro run from a button or shortcut key combo... Sub BUandSave2() 'Saves the current file to a backup folder and the default folder 'Note that any backup is overwritten Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs FileName:="E:\GordStuff\Backup\" & _ ActiveWorkbook.Name ActiveWorkbook.Save Application.DisplayAlerts = True End Sub You could alternatively place this code in a BeforeSave routine in This Workbook module. Right-click on the Excel logo left of "File" on menu and select "View Code" then paste into that module. Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.DisplayAlerts = False ActiveWorkbook.SaveCopyAs FileName:="E:\GordStuff\Backup\" & _ ActiveWorkbook.Name ActiveWorkbook.Save Application.DisplayAlerts = True End Sub Edit the path in the code to your network path. Gord Dibben Excel MVP On Tue, 3 May 2005 10:05:05 -0700, "doosbug" wrote: I have a spreadsheet that I work on my C: drive that I need to have a copy automatically saved (undated everytime I make changes) on a network drive so my boss can access it when she needs to review it. Can I do this? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How can I copy an .xls worksheet to another worksheet | Excel Worksheet Functions | |||
I can't get a worksheet to copy onto the workbook | Excel Worksheet Functions | |||
Automatically save file based on cell value | Excel Discussion (Misc queries) | |||
Excel shifts to wrong worksheet automatically | Excel Worksheet Functions | |||
save comments to a worksheet | Excel Worksheet Functions |