PasswordEncryptionProvider Property

expression.PasswordEncryptionProvider

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 algorithm in use is not the Microsoft RSA SChannel Cryptographic Provider.

Sub PasswordSettings()
    With ActivePresentation
        If .PasswordEncryptionProvider <> "Microsoft RSA SChannel Cryptographic Provider" Then
            .SetPasswordEncryptionOptions _
                PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
                PasswordEncryptionAlgorithm:="RC4", _
                PasswordEncryptionKeyLength:=56, _
                PasswordEncryptionFileProperties:=True
        End If
    End With
End Sub