expression.PasswordEncryptionKeyLength
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
Use the SetPasswordEncryptionOptions method to specify the algorithm PowerPoint uses for encrypting documents with passwords.
Example
This example sets the password encryption options if the password encryption key length is less than 40.
Sub PasswordSettings() With ActivePresentation If .PasswordEncryptionKeyLength < 40 Then .
SetPasswordEncryptionOptions
_ PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _ PasswordEncryptionAlgorithm:="RC4", _ PasswordEncryptionKeyLength:=56, _ PasswordEncryptionFileProperties:=True End If End With End Sub