Discussion :

[ilyes.sferi]

Bjrs tt le monde!
voila mon pb:
je viens de faire la conceprtion d'un userform: un textbox1, CommandButton1, 3 OptionButton1, 2 , 3 et Listbox1
et une feuille excel "Machines"
Déja j'arrive à afficer le continue de la feuille "Machines" dans listbox1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Private Sub UserForm_Activate()
With Sheets("Machines").Range("A2")
ListBox1.RowSource = Range(.Cells, .End(xlDown)(1, 8)).Address(External:=True)
End With
ListBox1.ListIndex = -1
End Sub

Mais mnt ce que je veus faire:
faire une recherche dans la listebox1 à travers textbox1 et CommandButton1
la recherche doit se faire selon OptionButton1, 2 , 3
cad: lorsque je sélectionne :
- OptionButton1 la recherché doit se faire sur la colonne 1 de la listbox1 (feuille"Machines")
- OptionButton2 la recherché doit se faire sur la colonne 2 de la listbox1 (feuille"Machines")
- OptionButton3 la recherché doit se faire sur la colonne 3 de la listbox1 (feuille"Machines")
et le résultat de recherché doit etre automatiquement sélectionner dans la listbox1 ou filtrer selon la valeur exacte taper dans textbox1.
voila ma conception:

[Kimy_Ire]

Bonjour ilyes.sferi,

Etant donné que tu recopies exactement la même chose dans ta ListBox que ce qu'il y a dans ton classeur, il est peut-être plus facile de faire la recherche sur la feuille Excel, non ?
Cela dépends de ce que tu veux faire quand tu trouves une ou plusieurs occurrences en fait :

• Que se passe-t-il si ta recherche conduit à plusieurs résultats ?
• Que se passe-t-il si tu ne trouves rien ?
• Quel est ton objectif fonctionnel ?

J'attends ton retour.

Cordialement,
Kimy

[ilyes.sferi]

Vous parlez comme si vous etes present dans mes idées!
- c tte une application de gestion parc machines, j'ai trouvé un solution efficace pour la recherche mais cette dérnière s'affiche dans 16 textbox qui représente les colonnes de mon tableau excel
mais j'ai bien voulue améliorer avec une listbox!
- la recherche sur les 3 première colonnes n'aboutit jamais à un résultat multiple puisque ce sont des références et des numéro de serie pour machine donc impossible de trouver des doublants dans une mm colonne ( col 1, 2 et 3).
après la recherché biensure seule une ligne qui va etres affichée ou selectionner je veux qu'on faisant un double clic sur cette ligne et automatiquement s'affiche un userforme qui contien tt les détailles ( tt les rée et le caractéristique ) de la machine pour affecter un ordre de travail à cette dérnière.
- et si je ne trouve rien un msgbox: "cette machine n'existe pas"
-et si je ne saisie rien dans le textbox un msgbox"vous devez saisir une reference"
je Croix que c tres compliquer! aumoin pour moi puisque je suis debutant!

[Invité]

Bonjour ,
Y a t-il des doublons de données sur la colonne 1,2,3?

Comme enrichis tu ta liste?

Peux tu faire 3 dictionnaire sur chaque colonne qui te donnerai directement la position en fonction d la valeur recherchée!

[ilyes.sferi]

il n y a pas des doublons
pour enrechir ma liste: j'ai un userform pour ajouter une nouvelle machines biensure ça s'ajoute aussi dans la feuille excel "Machines"
- a propos des dictionnaire je suis debutant donc j y connais rien!

[Invité]

Je suis sur mon téléphone portable, mais dès que possible je te fais une proposition, mais vola l'idée.

J'ai 3 colonne dans ma liste. Je scan ma liste et j'enrichi ma liste avec la valeur d la colonne et le numéro de la ligne.

Si je traite la colonne de. Option1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 l=Dico1("Mais Colonne1Value")

idem pour les autres options Dico2,Dico3!

Je filtre sens faire de recherche!