Document.Unprotect (Word)
Remove a proteção do documento especificado.
Se o documento não estiver protegido, esse método gerará um erro.
Unprotect (Password)
Password: A sequência de caracteres de senha usada para proteger o documento. As senhas distinguem maiúsculas de minúsculas. Se o documento estiver protegido com uma senha e a senha correta não for fornecida, uma caixa de diálogo pedirá a senha ao usuário.
If ActiveDocument.ProtectionType <> wdNoProtection Then
ActiveDocument.Unprotect Password:=strPassword
End If