expression.PasswordEncryptionFileProperties
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
Use the SetPasswordEncryptionOptions method to specify whether Word encrypts file properties for password-protected documents.
Example
This example sets the password encryption options if the file properties are not encrypted for password-protected documents.
Sub PasswordSettings()
With ActiveDocument
If .PasswordEncryptionFileProperties = False Then
.SetPasswordEncryptionOptions _
PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
PasswordEncryptionAlgorithm:="RC4", _
PasswordEncryptionKeyLength:=56, _
PasswordEncryptionFileProperties:=True
End If
End With
End Sub