Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Protect workbook
Sub ProtectWorkbook()
    Dim wb As Workbook
    Set wb = ThisWorkbook
    wb.Protect "Excel2003", True, True
    'wb.Unprotect
End Sub