Workbook.HasPassword (Excel)

True si el libro está protegido con una contraseña. Boolean de solo lectura.

Puede asignar una contraseña de protección a un libro mediante el método SaveAs .

Dim booHasPassword As Boolean
booHasPassword = ActiveWorkbook.HasPassword