Workbook.PasswordEncryptionProvider Property (Excel)
Returns a String specifying the name of the algorithm encryption provider that Microsoft Excel uses when encrypting passwords for the specified workbook. Read-only.
Syntax
expression .PasswordEncryptionProvider
expression A variable that represents a Workbook object.
Example
This example sets the password encryption options for the specified workbook, if the file properties are not encrypted for password-protected workbooks.
Sub SetPasswordOptions()
With ActiveWorkbook
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