Document.Unprotect (Word)

Supprime la protection du document spécifié.

Si le document n'est pas protégé, cette méthode génère une erreur.

Unprotect (Password)

Password: Chaîne du mot de passe utilisée pour protéger le document.

If ActiveDocument.ProtectionType <> wdNoProtection Then 
 ActiveDocument.Unprotect Password:=strPassword 
End If