[Excel 2010] Formulaire de recherche multi-listbox

Formulaire de recherche multi-listbox [Excel 2010] - VB/VBA/VBS - Programmation

Marsh Posté le 27-09-2014 à 18:37:10    

Salut :hello:,
 
Étant une vrai tanche en dev j'aurais besoin de vos services sur la problématique suivante:
 
J'ai une feuille unique Excel contenant des références produits et leurs tarifs.
Je cherche à faire un formulaire de recherche sur cette feuille qui doit:
1. Retourner dans une listbox1 les références correspondantes au texte recherché (textbox1)
2. Refaire une recherche à partir de l'élément sélectionné dans la listbox1
3. Retourner dans des listbox séparées les 4 cells contenant les détails de l’élément sélectionné.
 
Pour l'instant j'ai la partie 1 qui fonctionne correctement mais je ne sais pas relancer une recherche depuis la valeur selectionnée dans la listbox1.
 
Donc voila ce que ca donne du coup:

Code :
  1. Option Compare Text
  3. Private Sub ListBox1_Click()
  6. End Sub
  8. Private Sub TextBox1_Change()
  9. Application.ScreenUpdating = False
  11. ListBox1.Clear
  12.    
  13.     If TextBox1 <> "" Then
  14.         For ligne = 10 To 851
  15.             If Cells(ligne, 2) Like "*" & TextBox1 & "*" Then
  16.             ListBox1.AddItem Cells(ligne, 2)
  17.             End If
  18.         Next
  19.     End If
  20. End Sub


 
Merci de votre aide :jap:


---------------
WoW | D3 | Steam
Reply

Marsh Posté le 27-09-2014 à 18:37:10   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed