Macro to Set Create Backup As Default in Word for Windows

ID: Q49481

The information in this article applies to:

SUMMARY

To make sure that Create Backups is always selected when saving a document in Microsoft Word for Windows version 1.0, 1.1, and 1.1a, make the following modifications to the global macros FileSave and FileSaveAs:

FileSave Modifications

   Sub MAIN
   On Error Goto finish
   Dim FileDlg As FileSaveAs
   GetCurValues FileDlg
   FileDlg.CreateBackup = 1
   If FileDlg.Name = "" Then
      Dialog FileDlg
      Super FileSaveAs FileDlg
   Else
      Super FileSave
   End If
   finish:
   End Sub

FileSaveAs Modifications

   Sub MAIN
   On Error Goto finish
   Dlg:
      Dim FileDlg As FileSaveAs
      GetCurValues FileDlg
   FileDlg.CreateBackup = 1
   Dialog FileDlg
   Super FileSaveAs FileDlg
   finish:
   End Sub

MORE INFORMATION

If you have Word for Windows version 2.0 or 6.0, you can permanently select Create Backups by following the steps below:

1. From the Tools menu, choose Options.

2. Choose the Save category.

3. Select the Always Create Backup Copy check box.

Kbcategory: kbusage kbmacro KBSubcategory: Additional query words: 1.x 2.0 6.0 6.0a 6.0c winword2 word6 winword

Version           : 1.x 2.x 6.0 6.0a 6.0c
Platform          : WINDOWS

Last Reviewed: July 30, 1997