Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Show the workbook protection
Sub ShowWbProtection()
    Dim wb As Workbook
    Set wb = ThisWorkbook
    Debug.Print "Structure protected? " & wb.ProtectStructure, _
      "Windows protected? " & wb.ProtectWindows
End Sub