Thread: [Solved] Saving a doc in two places, Word 2000/2003
View Single Post
 
Old 11-23-2015, 09:04 PM
Raven917 Raven917 is offline Windows XP Office 2003
Novice
  
Join Date: Nov 2015
Location: Berkeley, CA
Posts: 2
Raven917 is on a distinguished road
Default Saving a doc in two places, Word 2000/2003
I was looking for a way for a friend to back up a document automatically to her Dropbox account and found this handy replacement Save method from Allen Wyatt's Word tips, which saves a named doc to a backup folder as well as to the default location:

Code:
Sub FileSave()
    Dim docName As Boolean
    Dim templateFullName As String

    docName = ActiveDocument.name Like "Document#*"
    templateFullName = ActiveDocument.FullName
    If docName = True Then
        Dialogs(wdDialogFileSaveAs).Show
    Else
        ActiveDocument.SaveAs FileName:="C:\Backups\" _
          & ActiveDocument.name, AddToRecentFiles:=False
        ActiveDocument.SaveAs FileName:=templateFullName
    End If
End Sub
It was easy to adapt to save to the Dropbox folder as well as to the default location. My question is this: It doesn't cover the situation where you close Word and are prompted "Do you want to save the changes to filename.doc? (Yes/No)" Does anyone have the name and content of that method, which I might try adapting to save in two places?
Reply With Quote