backup

when i save my budget report workbook, can i also save my
backup copy held in a diffrrent drive.

thanks

mark

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" wrote in message
...
when i save my budget report workbook, can i also save my
backup copy held in a diffrrent drive.

thanks

mark

Here is one I use to backup to the same folder in a sub folder. Modify to
suit.

Sub Backup() 'kept in personal.xls & assigned to toolbar button
On Error GoTo BackupFile
MkDir CurDir & "\Backup"
BackupFile:
With ActiveWorkbook
MyWB = .Path & "\BACKUP\" & .Name
.SaveCopyAs MyWB
.Save
End With
End Sub

--
Don Guillett
SalesAid Software

"Mark" wrote in message
...
when i save my budget report workbook, can i also save my
backup copy held in a diffrrent drive.

thanks

mark

Thanks
for this it works great one thing through if i wanted to=20
run this type of macro when i x out of excell what would=20
the top line read.

thanks

mark
-----Original Message-----
Mark, here is one way, from a post by Gord Didden

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

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



Sub BUandSave2()
'Private Sub Workbook_BeforeSave(ByVal SaveAsUI As=20
Boolean, Cancel As=20
Boolean)
'Saves the current file to a backup folder and the=20
default folder
'Note that any backup is overwritten
Application.DisplayAlerts =3D False
ActiveWorkbook.SaveCopyAs FileName:=3D"E:\Backup=AD\" & _
ActiveWorkbook.Name
ActiveWorkbook.Save
Application.DisplayAlerts =3D True
End Sub



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

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




--=20
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can=20
benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003







Gord Dibben Excel MVP


"Mark" wrote in=20
message=20
...
when i save my budget report workbook, can i also save=20
my
backup copy held in a diffrrent drive.

thanks

mark=20


.

thanks for this.

mark


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

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

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



Sub BUandSave2()
'Private Sub Workbook_BeforeSave(ByVal SaveAsUI As=20
Boolean, Cancel As=20
Boolean)
'Saves the current file to a backup folder and the=20
default folder
'Note that any backup is overwritten
Application.DisplayAlerts =3D False
ActiveWorkbook.SaveCopyAs FileName:=3D"E:\Backup=AD\" & _
ActiveWorkbook.Name
ActiveWorkbook.Save
Application.DisplayAlerts =3D True
End Sub



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

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




--=20
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can=20
benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003







Gord Dibben Excel MVP


"Mark" wrote in=20
message=20
...
when i save my budget report workbook, can i also save=20
my
backup copy held in a diffrrent drive.

thanks

mark=20


.