Pb recherche

Bonjour

Ci joint mon fichier.

dans le code ci dessous :

Option Compare Text

Private Sub textbox10_Change()
    Application.ScreenUpdating = False

    Feuil1.Range("C7:C15").Interior.ColorIndex = 2 'colonne designation
    'listbox8.Clear

    If TextBox10 <> "" Then
        For ligne = 7 To 15
            If Feuil1.Cells(ligne, 3) Like "*" & TextBox10 & "*" Then
               Feuil1.Cells(ligne, 3).Interior.ColorIndex = 43
                'listbox8.AddItem Feuil1.Cells(ligne, 3)
            End If
        Next
    End If
End Sub

Le but est de rentrer des données dans mon formulaire.

A chaque fois que je rentre des données je voudrais que mon "TextBox10" recherche automatiquement des mots déjà rentré auparavant... Le code ci dessus ne fonctionne pas.

cela concerne la colonne désignation, si je rentre plusieurs fois "toto" je veux que dès que je tape la première lettre cela affiche toto etc....

Annulé