Document.ReadOnly (Word)

True if changes to the document cannot be saved to the original document.

If ActiveDocument.ReadOnly = False Then ActiveDocument.Save