CB.WorksheetProtection Example 3

This example activates the target worksheet, unprotects the sheet with the current password, clears the password by passing an empty string, and leaves the sheet unprotected.

Sub WorksheetProtectionExample3()
   ' The following call activates the target worksheet
   ThisWorkbook.Worksheets("Sheet3").Activate

   ' The following call unprotects sheet with current password   CB.WorksheetProtection "passwd2", False


   ' following call clears the password
   CB.WorksheetProtection "", False
End Sub