如果活动文档含有以前未保存的更改,本示例将保存该文档。

If ActiveDocument.Saved = False Then ActiveDocument.Save