Bonjour à tous,

J'ai dans une cellule, une liste (sans code vba avec validation de donnée) qui affiche des éléments d'un tableau en fonction des lettres qui sont mise dans la cellule du style :
Si j'ai un tableau :
pomme
poire
cerise

et que j'écris dans la case "po", seulement pomme et poire vont s'afficher.

Maintenant, ce que j'aimerai faire c'est que cette liste s'affiche automatiquement à chaque fois que j'ajoute une lettre dans la cellule. J'ai déjà fait un code qui affiche la liste automatiquement quand je sors de la cellule mais ce n'est pas vraiment ce que je cherche et je ne sais pas comment le modifier.

Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
If Not Intersect([L10], Target) Is Nothing Then
        If Worksheets("Bon de Commande").Range("L10") = "" Then
        Else
        Target.Offset(0, 3).Select
        Target.Select
        SendKeys "%{Down}"
        End If
    End If
Merci d'avance pour votre aide !