Bonjour,
J'ai actuellement une Listbox qui m'affiche des informations d'articles liée à Textbox1 (pour la recherche de base) pour rechercher uniquement par l'intitulé de l'article.
J'aimerais modifier mon code (sans savoir comment ...) pour recherche via plusieurs Textbox...
Textbox1 pour les intitulés
Textbox2 pour les fournisseurs
Textbox3 pour les groupes
merci pour votre aide
J'ai actuellement une Listbox qui m'affiche des informations d'articles liée à Textbox1 (pour la recherche de base) pour rechercher uniquement par l'intitulé de l'article.
VB:
Private Sub TextBox1_Change()
Dim DerLigne&, Ligne&
ListBox1.Clear
With Worksheets("Tarification")
DerLigne = .Cells(Rows.Count, 2).End(xlUp).Row
For Ligne = DerLigne To 4 Step -1
With .Cells(Ligne, 2)
If .Value <> 0 Then
If InStr(LCase$(.Value), LCase$(TextBox1)) > 0 Then
ListBox1.AddItem ' colonne
ListBox1.List(ListBox1.ListCount - 1, 0) = .Value
ListBox1.List(ListBox1.ListCount - 1, 1) = .Offset(, 1)
' ListBox1.List(ListBox1.ListCount - 1, 2) = .Offset(, 2)
End If
End If
End With
Next Ligne
End With
End Sub
J'aimerais modifier mon code (sans savoir comment ...) pour recherche via plusieurs Textbox...
Textbox1 pour les intitulés
Textbox2 pour les fournisseurs
Textbox3 pour les groupes
merci pour votre aide