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 Excel encrypts file properties for the specified password-protected workbook.
Example
This example sets the password encryption options if the file properties are not encrypted for password-protected workbooks.
Sub SetPasswordOptions()
With ActiveWorkbook
If .PasswordEncryptionFileProperties = False Then
.SetPasswordEncryptionOptions _
PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
PasswordEncryptionAlgorithm:="RC4", _
PasswordEncryptionKeyLength:=56, _
PasswordEncryptionFileProperties:=True
End If
End With
End Sub