Document.ReadOnly (Word)

True se as alterações no documento não podem ser salvos no documento original. Boolean somente leitura.

If ActiveDocument.ReadOnly = False Then ActiveDocument.Save