Saved Property Example

This example saves the active document if it contains previously unsaved changes.

If ActiveDocument.Saved = False Then ActiveDocument.Save

This example changes the status of the Normal template to unchanged. If changes were made to the Normal template, the changes aren't saved when you quit Word.

NormalTemplate.Saved = True
Application.Quit