How do I save a document in two separate folders with one command.

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I'd like to save a Word document on my hard drive (backup folder) and my
storage device (E:\) using minimal key strokes. I'm currently "Saving As" to
one folder, then "Saving As" to another folder. I'm not familiar with
keyboard macros in Word 2003, and my initial search has yielded no results.
Thank you.
 
If your "storage device" is removable, it is not safe to save there. Save to
the HD and Copy or Send to the storage device.

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA

Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.
 
I agree with Suzanne, but if the second location is a hard drive then see
http://www.gmayor.com/automatically_backup.htm
If the second location *is* a removable drive then this technique could
result in a corrupt copy, however the following macro will copy to a
removable drive - if present.

*Note that the macro does not test to see if the destination files exist. It
will simply overwrite them without warning.*

Sub CopyDocToFloppy()
Dim SourceFile, SourceFullName, DestinationFile As String
ActiveDocument.Save
SourceFile = ActiveDocument.Name ' Define source file name.
DestinationFile = "E:\" & SourceFile ' Define target file name.
ActiveDocument.Close
On Error GoTo oops
FileCopy SourceFile, DestinationFile ' Copy source to target
Documents.Open SourceFile
End
oops:
MsgBox "The copy location is not available"
Documents.Open SourceFile
End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web site www.gmayor.com

<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
 
Back
Top