Hi - I am trying to do the same but instead of excluding 1 sheet, I want to exclude 2 or more specific streets. I edited the code to the below but it still loops through ALL the sheets. When I have it just a single sheet being excluded, it works but not with the below. What is the proper way to write in such a code?


Sub loop_all_sheets()
Num_Sheets = Application.Sheets.Count
For y = 1 To Num_Sheets
If Sheets(y).Name <> "Lookup" or _
sheets (y).Name <> "Test" Then
Sheets(y).Select
MsgBox "Selected sheet: " & ActiveSheet.Name ' Just for diagnostics
End If
Next
End Sub