Empecher une recherche dans certaines feuilles

Bonjour à tous ....
J'ai decidement beaucoup de soucis avec mon Userform de recherche 😱
Grace à tous les experts du forum, j'ai réussi à m'en sortir, mais je vais encore avoir besoin d'un conseil ...

J'ai un bouton qui recherche dans une feuille nommée "CASIER"
Il ne doit pas chercher dans les autres feuilles nommées "INDEX", "BASE1" et "BASE2" .....
Voici le code du "Moteur de Recherche" dans le UserForm :

Private Sub CommandButton1_Click()
Dim c As Range
Dim Tablo() As String
Dim Text As String
Dim S As Byte
Dim Firstaddress As String
Dim i As Integer, X As Integer, L As Integer


Text = Me.TextBox1
If Text = "" Then Exit Sub

For S = 1 To Worksheets.Count
If Worksheets(S).Name <> "INDEX" Then
With Sheets(S).UsedRange
Set c = .Find(Text, LookIn:=xlValues, LookAt:=xlPart)
If Not c Is Nothing Then
Firstaddress = c.Address
Do
ReDim Preserve Tablo(8, i)
For X = 1 To 6
Tablo(X - 1, i) = c.Offset(0, X - c.Column).Text
Next X
Tablo(6, i) = Sheets(S).Name
Tablo(7, i) = c.Address(0, 0)
i = i + 1
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> Firstaddress
End If
End With
End If
Next S
If i = 0 Then
MsgBox "La référence " & Text & " n'a pas été trouvé" & vbCrLf & "Faites un autre essai", vbCritical, Sign
Exit Sub
End If
Me.ListBox1.Column() = Tablo()

End Sub

J'ai bien compris que "If Worksheets(S).Name <> "INDEX" Then ..." empechait la recherche mais comment ajouter d'autres feuilles ???

Si quelqu'un peu m'aider ....