Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doublon

[antiphot]

Bonjour à toutes et à tous


A l'ouverture du userform1, on peut taper qq lettres dans le textbox1 pour filtrer les éléments de la listbox1 en fonction de notre recherche qui se précise au fur et à mesure du nombre de lettres tapées.
Tout fonctionne bien, sauf que l'on peut se retrouver avec le même item plusieurs fois. Et là je coince !

ci-joint mon fichier exemple

Merci par avance pour vos conseils éclairés

Cordialement
Philippe

 

[laetitia90]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

bonjour antiphot
c'est quoi la question??? ou quel est le but a atteindre???

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Bonjour Laetitia90

Et bien le but à atteindre est d'avoir quelle que soit la lettre ou mot tapé dans le textbox1, un tri dans la listbox1 sans doublon. Ce qui n'est pas le cas actuellement. En effet si tu tapes A tu verras les items en double.

 

[laetitia90]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

re, si pas de reponse regarderais demain soir plus le temps
sorry

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Merci Laetitia90, je remonte le post au cas ou !

 

[pierrejean]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Bonjour voisin
bises laetitia (si tu le permets)

Une solution (dans le contexte, et qui ne vise pas à envisager le futur)

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Bonjour pierrejean

La solution a en plus le mérite d'être plus concise Par contre La recherche dans le textbox doit se faire aussi bien dans la colonne B ou la colonne C de la feuille BD

 

[pierrejean]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Re

A priori pas de problème , il suffit de redefinir plage:

Set plage = Sheets("BD").Range("B3:C" & Sheets("BD").Range("C65536").End(xlUp).Row)

mais il faut que nous soyons bien d'accord sur le fait que l'on recherche le debut du contenu de la cellule

 

[pierrejean]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Re

Autre version:

Affichage de 3 colonnes

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Ah je me disais aussi ! effectivement avec find je peux effectuer une recherche sur une partie ou sur la totalité de la cellule ce qui est indispensable pour l'utilisateur qui ne connaît pas forcément le libellé exact. En fait le code que j'utilisais est si je ne m'abuse une adaptation d'une macro de Boisgontier. Le problème étant que au cours de la recherche sur l'une des 2 colonnes de la plage B3:C .....
si la ou les lettres recherchées sont communes, du coup je me retrouve avec deux fois la même ligne dans ma listbox. Ce que je désire éviter mais en gardant les spécifications du code actuel.

Je ne sais pas si je suis très clair

 

[pierrejean]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Re

Autre version à tester
En supposant cette fois avoir bien compris les tenants et aboutissants

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Merci pour ta patience. En ce qui concerne la version à tester je pense qu'il manque le fichier joint

 

[antiphot]

Re : Recherche intuitive dans textbox pour alimenter listbox multicolonnes sans doubl

Je viens de tester et c'est parfait. C'est exactement ce que je voulais. Désolé d'avoir été un peu confus dans ma demande.

Philippe