Recherche par mot clé

Résolu
benzi Messages postés 66 Date d'inscription   Statut Membre Dernière intervention   -  
benzi Messages postés 66 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai un tableau où il y a dans chaque colonne le nom, prénom, fonction, tel, fax etc...
Comme la liste est importante, je voudrai créer une recherche rapide. En tapant les 3 premières lettres ou un mot clé soit dans un userform ou une liste déroulante ou autre pour que cela sélectionne la ligne correspondante au nom.
Quelqu'un aurait-il la solution SVP? Merci D'avance.



2 réponses

eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonjour,

Un exemple en vba que tu pourras adapter à ton problème : exemple .
Alt+F11 pour aller dans l'éditeur vbe

eric
0
benzi Messages postés 66 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour eriiic,

Merci pour ta réponse, cela me convient et je pourrai l'adapter à d'autres sujets.
Par contre, j'aime bien comprendre, peux-tu m'expliquer à quoi correspondent les formules vba.
Pas la relation entre les textbox ou les commonbutton mais les formules types. Merci déjà pour ton aide.

Dan
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 275
 
Bonsoir,

Difficile d'expliquer, le code est très court, sauf qu'il est répété plusieurs fois.
Sur une fonction ou une méthode que tu ignores tu peux faire F1 pour l'aide qui est bien faite.

Private Sub Tbx1_Change()
    Selection.AutoFilter Field:=1, Criteria1:="=*" & Tbx1.Text & "*", Operator:=xlAnd
End Sub

Active le filtre sur une saisie dans la textbox. Filtre sur '*le_texte_saisi*' (criteria1) c'est à dire si le texte est contenu dans la cellule. Si tu enlèves la première étoile tu filtrerais sur 'commence par le_texte_saisi'.

Private Sub Tbx1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
    Tbx1.Text = ""
    Selection.AutoFilter Field:=1
End Sub

Si double-clic dans la textbox, vide le texte et annule le filtre

eric
0
benzi Messages postés 66 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonsoir Eric,

C'est très sympa à toi, j'ai bien compris le fonctionnement en le faisant mais ces explications que tu donnes me permettent de cibler chaque détails.
Merci

Dan
0