Perform action on select sheets upon opening workbook

[newrui]

Hi all, I have a workbook with 10 sheets, and I have the below code to un-protect, enable outlining and re-protect all sheets upon opening the workbook:

Private Sub Workbook_Open()

Dim wksht As Worksheet
For Each wksht In ThisWorkbook.Sheets
    With wksht
        .Unprotect "password"
        .EnableOutlining = True
        .Protect "password", contents:=True, userInterfaceOnly:=True
    End With
Next wksht

Worksheets("Instructions & Notes").Rows("1:2").Hidden = True

End Sub

What if I'd like to perform the action on all sheets except "Sheet 1" and "Sheet 2"? Thanks in advance!

[StevenM]

What if I'd like to perform the action on all sheets except "Sheet 1" and "Sheet 2"?

If you know the name of these worksheets, then something like:

Private Sub Workbook_Open()

Dim wksht As Worksheet
For Each wksht In ThisWorkbook.Sheets
    If wksht.Name <> "Sheet1" _
    And wksht.Name <> "Sheet2" Then
        With wksht
            .Unprotect "password"
            .EnableOutlining = True
            .Protect "password", contents:=True, userInterfaceOnly:=True
        End With
    End If
Next wksht

Worksheets("Instructions & Notes").Rows("1:2").Hidden = True

End Sub

[newrui]

Thanks Steve, works!