Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Formulaire de recherche avec résultat dans zone de liste

mogador

XLDnaute Nouveau
Bonjour. Je suis nouveau sur le forum et je recherche une solution pour actualiser une zone de liste en fonction des valeurs saisies dans des TextBox. L'idée est de filtrer un tableau Excel et d'afficher le résultat dans la zone de liste. Il me semble avoir vu un exemple dans un autre forum mais je n'arrive plus à le retrouver...
Merci pour votre aide!
 

mogador

XLDnaute Nouveau
Re : Formulaire de recherche avec résultat dans zone de liste

Voici un exemple de fichier avec le formulaire.
L'idée est d'afficher le résultat d'un filtre, à partir de 3 valeur saisies dans des Textbox, dans une zone de liste...
Merci
 

Pièces jointes

  • Classeur1.xls
    36.5 KB · Affichages: 72
  • Classeur1.xls
    36.5 KB · Affichages: 84
  • Classeur1.xls
    36.5 KB · Affichages: 84

mogador

XLDnaute Nouveau
Re : Formulaire de recherche avec résultat dans zone de liste

J'ai ajouté ce bout de code pour filtrer le tableau et afficher les résultats dans la zone de liste:
Private Sub TextBox1_Change()
Dim crit1 As String
crit1 = TextBox1.Text
Sheets("Feuil1").Select
ActiveSheet.Range("$A$1:$C$6").AutoFilter Field:=1, Criteria1:=crit1, _
Operator:=xlAnd
Dim Plage As String
With Sheets("Feuil1")
Plage = .Range("A1:A" & .Range("A65536").End(xlUp).Row).Address
End With
ListBox1.RowSource = "Feuil1!" & Plage
End Sub

Mais les résultats ne sont pas concluants...
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…