Método Document.SetPasswordEncryptionOptions (Word)

Define as opções que o Microsoft Word usa para criptografar documentos com senhas.

Sintaxe

expression. SetPasswordEncryptionOptions( _PasswordEncryptionProvider_ , _PasswordEncryptionAlgorithm_ , _PasswordEncryptionKeyLength_ , _PasswordEncryptionFileProperties_ )

expressão Obrigatório. Uma variável que representa um objeto Document.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
PasswordEncryptionProvider Obrigatório String O nome do fornecedor de criptografia.
PasswordEncryptionAlgorithm Obrigatório String O nome do algoritmo de criptografia. O Word aceita algoritmos criptografados por fluxo.
PasswordEncryptionKeyLength Obrigatório Long O tamanho da chave de criptografia. Precisa ser múltipla de 8, começando com 40.
PasswordEncryptionFileProperties Opcional Variant True para o Word para criptografar propriedades de arquivo. O padrão é True.

Comentários

Para maior segurança, não use algoritmos XOR (criptografia fraca) (também chamados de "OfficeXor") ou "Office97/2000 Compatible" (também chamados de algoritmos "OfficeStandard").

Exemplo

Este exemplo define a criptografia da senha para uma criptografia forte se o algoritmo de criptografia da senha em uso for "OfficeXor" ou "OfficeStandard."

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

Confira também

Objeto Document

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.