Listing réponse par rapport a une entrée de données (autre question)

[sonny]

Salutations a tout le forum

donc je vais essayer de vous d'écrire mon problo, hier j ai posté un message, et Creepy m'a gentiment créé une belle matrice qui fonctionne quasi parfaitement, mais le problo; c est que cette macro ne prend en compte qu'une de mes deux feuilles excel et pas l autre, je ne sais pas si je suis assez clair....... ci joint l ecriture visual basic:

Private Sub CommandButton1_Click()
Dim Cell As Range
Dim I As Byte
Dim L As Byte
' facon de rechercher en fonction du bouton activé, client, Marché ou N° de marché
If Feuil1.Range("E8").Value = "" Then
MsgBox "Vous devez taper un nom pour effectuer une recherche !!", vbCritical + vbOKOnly, "Attention ..."
Exit Sub
End If

I = 18

Dim TxtQuoi As String

TxtQuoi = Feuil1.Range("E8").Value
L = Len(TxtQuoi)
For Each Cell In Sheets("Matrice").Range("B2", "B" & Range("B65536").End(xlUp).Row)
If UCase(Left(Cell.Text, L)) = UCase(TxtQuoi) Then
Feuil1.Range("E" & I).Value = Cell.Offset(0, -1).Text
I = I + 1
End If
If I = 27 Then
MsgBox "Plus de resultats que je ne peux en afficher!!" & Chr(10) & "Les derniers ne seront pas affiché!!", vbCritical + vbOKOnly, "Attention ..."
Exit Sub
End If
Next Cell
End Sub

donc voila si quelqu'un avait une idée je suis preneur
ps: je précise qu'il n y pas d erreur de saisie

merci d avance, @micalement, @++