Document.SetPasswordEncryptionOptions-Methode (Word)

Legt die Optionen fest, die in Microsoft Word verwendet werden, um kennwortgeschützte Dokumente zu verschlüsseln.

Syntax

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

expression Erforderlich. Eine Variable, die ein Document-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
PasswordEncryptionProvider	Erforderlich	String	Der Name des Verschlüsselungsproviders.
PasswordEncryptionAlgorithm	Erforderlich	String	Der Name des Verschlüsselungsalgorithmus. In Word werden streamverschlüsselte Algorithmen unterstützt.
PasswordEncryptionKeyLength	Erforderlich	Long	Die Länge des Verschlüsselungsschlüssels. Sie muss ein Mehrfaches von 8 sein, beginnend bei 40.
PasswordEncryptionFileProperties	Optional	Variant	True, wenn Dateieigenschaften in Word verschlüsselt werden sollen. Der Standardwert ist True.

Hinweise

Verwenden Sie aus Sicherheitsgründen keine Schwachverschlüsselung (XOR) (auch als "OfficeXor" bezeichnet) oder "Office97/2000 Compatible" (auch als "OfficeStandard" bezeichnet) Algorithmen.

Beispiel

In diesem Beispiel wird die Kennwortverschlüsselung auf einen sichereren Verschlüsselungsalgorithmus festgelegt, wenn für die Verschlüsselung gegenwärtig der OfficeXor- oder OfficeStandard-Algorithmus verwendet wird.

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

Siehe auch

Document-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.