Document.ReadOnly (Word)

True si les modifications apportées au document ne peuvent pas être enregistrées dans le document d'origine.

If ActiveDocument.ReadOnly = False Then ActiveDocument.Save