Document.PasswordEncryptionProvider (Word)

Devuelve una cadena que especifica el nombre del proveedor del algoritmo de cifrado que Microsoft Word utiliza para cifrar los documentos con contraseñas.

Utilice el método SetPasswordEncryptionOptions para especificar el nombre del proveedor del algoritmo de cifrado que Word utiliza para cifrar los documentos con contraseñas.

Sub PasswordSettings() 
 With ActiveDocument 
 If .PasswordEncryptionProvider <> "Microsoft RSA SChannel Cryptographic Provider" Then 
 .SetPasswordEncryptionOptions _ 
 PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _ 
 PasswordEncryptionAlgorithm:="RC4", _ 
 PasswordEncryptionKeyLength:=56, _ 
 PasswordEncryptionFileProperties:=True 
 End If 
 End With 
End Sub