Programming Excel with VBA and .NET

Name

workbook.PasswordEncryptionAlgorithm

Synopsis

Returns a string indicating the type of encryption used for a workbook. The following code displays the encryption properties for a workbook in the Immediate window:

    Set wb = ThisWorkbook
    Debug.Print "Encrytpion algrorythm: " & wb.PasswordEncryptionAlgorithm, _
      "Encrypt properties? " & wb.PasswordEncryptionFileProperties, _
      "Key length:" & wb.PasswordEncryptionKeyLength, _
      "Provider: " & wb.PasswordEncryptionProvider

If a workbook is not encrypted, the PasswordEncryptionAlgorithm is OfficeStandard.