Hi,
The following code put into a new code object will unprotect a worksheet called ""File"".
Dim wb As Object
Dim ws as Object
Try
wb = GetWorkbook(Handle, Workbook)
ws = wb.Worksheets(""File"")
ws.Unprotect(Password)
Success = True
Catch e As Exception
Success = False
Message = e.Message
Finally
wb = Nothing
End Try
I duplicated the ""Protect Worksheet"" object and modified the code stage with this code. Replace the hard coded value ""File"" with the name of your worksheet.