Document.Saved (Word)
True se o modelo ou documento especificado não tiver sido alterado desde que foi salvo pela última vez. False se o Microsoft Word exibe um aviso para salvar as alterações quando o documento é fechado. Boolean de leitura/gravação.
If ActiveDocument.Saved = False Then ActiveDocument.Save