XL 2016 Recherche et filtre tab auto

sousou

XLDnaute Barbatruc

• 26 Septembre 2021

• #2

Bonjour
Voici pour une partie de ta question.
Pas bien compris sur la saisie de la somme, un exemple?

 

Pièces jointes

• Copie de liste Excel.xlsm

  27 KB · Affichages: 9

Vote positif 0 Vote négatif

A

achraf26

XLDnaute Occasionnel

• 26 Septembre 2021

• #3

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

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 27 Septembre 2021

• #4

Je ne vois pas la solution que je t'ai proposée?
La question était comment veux-tu rechercher cette somme sur quelle colonne?

 

Vote positif 0 Vote négatif

A

achraf26

XLDnaute Occasionnel

• 27 Septembre 2021

• #5

sousou à dit:

Je ne vois pas la solution que je t'ai proposée?
La question était comment veux-tu rechercher cette somme sur quelle colonne?

Cliquez pour agrandir...

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: 8

Dernière édition: 27 Septembre 2021

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 27 Septembre 2021

• #6

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

 

Vote positif 0 Vote négatif

A

achraf26

XLDnaute Occasionnel

• 27 Septembre 2021

• #7

sousou à dit:

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

Cliquez pour agrandir...

Bonjour Sousou,
j'ai essayé de rajouter le code, mais ça marche pas, apparemment je saisie mal le texte.

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 27 Septembre 2021

• #8

il faut que ta liste de choix soit identique au titre des colonne de ton tableau
donc :

Réf.

Fournisseurs

Factures A.

 

Vote positif 0 Vote négatif

sousou

XLDnaute Barbatruc

• 27 Septembre 2021

• #9

comme ceci

 

Pièces jointes

• Copie de liste Excel.xlsm

  24.3 KB · Affichages: 11

Vote positif 0 Vote négatif

A

achraf26

XLDnaute Occasionnel

• 27 Septembre 2021

• #10

sousou à dit:

comme ceci

Cliquez pour agrandir...

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: 27 Septembre 2021

Vote positif 0 Vote négatif