Hi

Is there a way i can modify the code below so a specific worksheet in my workbook remains unprotected?

Private Sub Workbook_Open()


Dim wSheet As Worksheet

    For Each wSheet In Worksheets

        wSheet.protect Password:="Password", _
        UserInterFaceOnly:=True

Next wSheet

many thanks
 
   
End Sub