Recherche dynamique

[Hell Wheel]

Bonjour à tous.
Je suis en train de réaliser un tableau de données, je souhaitais insérer au départ une barre de recherche dynamique, sauf que mon tableau fait pas loin de 1500 lignes.
Pour une recherche plus simple, est-il possible de faire une barre de recherche dynamique sur une autre feuille, qui au fur et à mesure que l'on écrit dedans, affiche les lignes correspondantes sur cette même feuille (en dessous de la barre de recherche), et au fur et à mesure qu'on précise la recherche, ça réduit la liste pour ne laisser au final que la ligne concernée?
Merci pour votre aide.

 

[jcf6464]

Bonjour Hell wheel et le forum

Regarde ce lien

Remplissage dynamique d'un ComboBox comme google

Pourtant que j'ai appliqué le même code opérationnel en changeant le nom de table et les variables d'appel, le code ne fonctionne pas pour une deuxième insta...

forum.excel-pratique.com

Bonne continuation

jcf

 

[mapomme]

Bonjour @Hell Wheel, @jcf6464,

• Avec un filtre avancé
• Avec un peu de code dans le module de la feuille "Feuil1"

Option Explicit
Const MaxLigne = 2000

Private Sub Quoi_Change()
   Range("D2") = "*" & Quoi & "*"
   Range("D6:D2" & MaxLigne).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range("D1:D2"), Unique:=False
End Sub

 

[fanfan38]

Bonjour,
En l'absence de fichier ci joint une proposition...
A+ François

 

[Hell Wheel]

Merci pour votre aide. Bone remarque de fanfan38, je vous joins le fichier.

Merci à vous.

 

[BOISGONTIER]

Bonjour,


Exemple de recherche intuitive type Google. La liste se réduit au fur et à mesure de la frappe des caractères.

Listes en cascade

Boisgontier

 

[Hell Wheel]

Merci Boigontier, je suis en train de m'inspirer de ce que tu as fait .
J'aurais peut être une ou deux questions, je regarde d'abord.

 

[Hell Wheel]

Bonjour,
La Textbox2 est affecté aux valeurs d'une colonne, je voudrais l'affecter à une autre colonne, mais je n'y arrive pas, comment faire?

Merci pour votre aide

 

[BOISGONTIER]

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormRechercheTextBoxListBoxBase0.xls

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormChoixColonneRechercheTextBox.xls

Boisgonntier

 

[mapomme]

Bonjour,

Une autre version avec un critère pour chaque colonne.

 

[Hell Wheel]

Bonjour, malgré du temps passé dessus je n'arrive pas à changer l'affectation des texbox .

Lors de la "recherche passe accès poste";
La textbox 2 "Passe" m'affiche la valeur de la colonne "GMR" alors que je souhaiterais la colonne "Passe"
La textbox 3 "Badge" m'affiche la valeur de la colonne "SITE" alors que je souhaiterais la colonne "Badge"
La textbox 4 "Mis à jour le" m'affiche la valeur de la colonne "GMR" alors que je souhaiterais la colonne "Vérifié"

Pouvez-vous m'aider et aussi m'expliquer comment vous avez fait?

Je vous remercie de votre aide.

 

[jcf6464]

Bonjour Hell Wheel Mapommme et le forum
Change le code suivant copier coller à la place de l'autre

Private Sub UserForm_Initialize()
   Set f = Sheets("GCE HELP DESK CATEGORY MATRIX")
   Set Rng = f.Range("D9:F" & f.[D65000].End(xlUp).Row)
   TblTmp = Rng.Value
   Ncol = Rng.Columns.Count
   For i = LBound(TblTmp) To UBound(TblTmp)
     ReDim Preserve choix(1 To i)
     For k = LBound(TblTmp) To UBound(TblTmp, 2)
       choix(i) = choix(i) & TblTmp(i, k) & " * "
     Next k
   Next i
   Me.ListBox1.List = Rng.Value
End Sub

en espérant avoir répondu à tes souhaités
A+ jcf

 

[Hell Wheel]

Merci de m'aider jcf6464.
J'ai remplacé le code mais ça ne fonctionne toujours pas.

 

[mapomme]

Bonjour à tous ,

Voir le fichier joint ?

 

[jcf6464]

RE à vous tous

Tu dis

je n'arrive pas à changer l'affectation des texbox

mais la Maintenant la recherche ce fait sur les colonnes 4,5,6
Voir capture écran,


A+ jcf