XL 2016 Recherche et filtre tab auto

achraf26

XLDnaute Occasionnel
Bonjour,
j'ai à nouveau envoyé ce poste afin de m'aider à trouver une solution à mon problème

j'ai créer un tableau nommé "TLP" et en "E2" : je voudrais quand j'écris une partie d'un mot, le tableau est trié, exemple :
je saisie "XW" toutes les lignes dont les mots contenaient "XW" seront affiché.
Je saisie "une somme" toutes les lignes contenaient cette somme seront affiché.
NB je prend pas en considération la 1er colonne dans les recherche.

Filtre avancé :
j'ai rajouté une cellule "H2", si la cellule est vide, la recherche est dans tous le tableau et si la cellule contient "x" la recherche et doit être faite dans la colonne X.
si "Réf" ; la recherche sera à la 2é colonne
si "Fournisseur"; la recherche sera à la 5é colonne

j'épsere que j'ai bien expliqué.
Trés cordialement
 

Pièces jointes

  • liste Excel.xlsx
    16 KB · Affichages: 9
Dernière édition:

achraf26

XLDnaute Occasionnel
Bonsoir Sousou,
Merci pour le fichier, par rapport la somme, si je saisie un nombre ex 524,70 la ligne n'est pas trouvé.
et le filtre n'est pas automatique.
ci joint fichier dont je suis entrain de faire la Macro, mais il est un peu lent, je dois juste rajouter la liste de trier par : afin de chercher dans une colonne précise.

j'ai mis en E1 numéro de la colonne et E2 une partie du mot que je cherche ex :
si je met : "xw" tous les lignes dont un mot contient un xw sera affiché et c'est automatique.
si vous avez d'autres solution plus simple je suis prenant.
Trés cordialement
 

Pièces jointes

  • trie auto ou specifique.xlsm
    24.1 KB · Affichages: 4

achraf26

XLDnaute Occasionnel
Je ne vois pas la solution que je t'ai proposée?
La question était comment veux-tu rechercher cette somme sur quelle colonne?
bonjour sousou, la solution que tu m'as proposé n'était pas automatique, et par rapport le montant, il pouvait être sur n'importe quelle colonne que je fais recherche sans condition, mais j'ai trouvé la solution en doublant la colonne des chiffre existant et en forçant le format en texte.
je veux juste savoir rajouter la liste (pour préciser la colonne de recherche)
Trés cordialement
 

Pièces jointes

  • trie auto ou specifique.xlsm
    24.1 KB · Affichages: 7
Dernière édition:

sousou

XLDnaute Barbatruc
Pour la liste tu ajoutes la fonction
Function numcol(k1)
Dim n
With ActiveSheet.ListObjects("TLP")
For n = 1 To .ListColumns.Count
If .ListColumns(n) = k1 Then numcol = n: Exit For
Next
End With

End Function

Puis tu inseres
If Target.Address = "$H$2" Then Range("e1") = numcol(Range("H2"))
au debut de ta procédure Change
 

achraf26

XLDnaute Occasionnel
Pour la liste tu ajoutes la fonction
Function numcol(k1)
Dim n
With ActiveSheet.ListObjects("TLP")
For n = 1 To .ListColumns.Count
If .ListColumns(n) = k1 Then numcol = n: Exit For
Next
End With

End Function

Puis tu inseres
If Target.Address = "$H$2" Then Range("e1") = numcol(Range("H2"))
au debut de ta procédure Change
Bonjour Sousou,
j'ai essayé de rajouter le code, mais ça marche pas, apparemment je saisie mal le texte.
 

achraf26

XLDnaute Occasionnel
Merci sousou,
il y'a une chose que j'ai oublié de préciser, conditions :
si E2 est vide rien ne doit se passer quand je sélectionne la liste (Tri désactivé)

NB pourquoi le processus prend beaucoup du temps pour rechercher ou remettre tous le tableau en entier ? et la1er ligne du tableau n'est pas affiché directement quand j'efface la saisie en E2.
Merci à vous
 
Dernière édition:

Discussions similaires