Document.WritePassword (Word)

Legt ein Kennwort zum Speichern von Änderungen im angegebenen Dokument fest.

Set myDoc = ActiveDocument 
If myDoc.WriteReserved = False Then myDoc.WritePassword = "secret"