Rather than looking for Sheet1 or Sample, look for everything else...

Dim wSht As Worksheet
For Each wSht In Worksheets
If wSht.Name <> "Sheet1" and wSht.Name <> "Sample" Then
-'Code for rest  of sheets
End if
Next