Workbook.PasswordEncryptionFileProperties (Excel)
True se o Microsoft Excel criptografar as propriedades de arquivo para a pasta de trabalho especificada protegida por senha. Boolean somente leitura.
Use o método SetPasswordEncryptionOptions para especificar se o Excel criptografa as propriedades do arquivo da pasta de trabalho protegida por senha especificada.
Dim booPasswordEncryptionFileProperties As Boolean
booPasswordEncryptionFileProperties = ActiveWorkbook.PasswordEncryptionFileProperties