Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
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
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.