Mega Code Archive
Categories
/
VisualBasic Script
/
Excel
Unprotect worksheet
Sub UnprotectWS() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Protection") ws.Unprotect "Excel2003" End Sub