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
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.