Méthode Document.SetPasswordEncryptionOptions (Word)
Définit les options que Microsoft Word utilise pour chiffrer les documents protégés par mot de passe.
Syntaxe
expression. SetPasswordEncryptionOptions
( _PasswordEncryptionProvider_
, _PasswordEncryptionAlgorithm_
, _PasswordEncryptionKeyLength_
, _PasswordEncryptionFileProperties_
)
expression Obligatoire. Variable qui représente un objet Document.
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
PasswordEncryptionProvider | Obligatoire | Chaîne | Nom du fournisseur du chiffrement. |
PasswordEncryptionAlgorithm | Obligatoire | Chaîne | Nom de l'algorithme de chiffrement. Word prend en charge les algorithmes de chiffrement stream. |
PasswordEncryptionKeyLength | Obligatoire | Entier long | Longueur de la clé de chiffrement. Doit être un multiple de 8, en commençant à 40. |
PasswordEncryptionFileProperties | Facultatif | Variant | True pour que Word chiffre les propriétés de fichier. Valeur par défaut est True. |
Remarques
Pour renforcer la sécurité, n’utilisez pas d’algorithmes de chiffrement faible (XOR) (également appelé « OfficeXor ») ou « Compatible Office97/2000 » (également appelé « OfficeStandard »).
Exemple
Cet exemple montre comment définir un chiffrement fort pour les mots de passe si l'algorithme de chiffrement des mots de passe utilisé est « 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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.