Re: backup

From: Paul B (to_much_spam_to_list_at_nospam.com)
Date: 03/25/05 

Date: Fri, 25 Mar 2005 10:07:07 -0500

Mark, here is one way, from a post by Gord Didden

You could create a macro that will save the file at the default location and
a
copy to the folder of your choice.

The macro could be run manually or in beforesave code in ThisWorkbook.

Sub BUandSave2()
'Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
'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:\Backup­\" & _
            ActiveWorkbook.Name
    ActiveWorkbook.Save
    Application.DisplayAlerts = True
End Sub

if you are new to macros you may also what to have a look here on getting
started with macros

http://www.mvps.org/dmcritchie/excel/getstarted.htm 

-- 
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003
Gord Dibben Excel MVP
"Mark" <anonymous@discussions.microsoft.com> wrote in message 
news:116d01c5311d$0843a270$a401280a@phx.gbl...
> when i save my budget report workbook, can i also save my
> backup copy held in a diffrrent drive.
>
> thanks
>
> mark
Quantcast