Trier par vba valeur autre que 0

gagnonpeter · 20 Octobre 2015

Bonjour!
j'ai créé un fichier où je dois trier des données qui proviennent d'un autre onglets. Mon problème est que quand je fais mon tri (par macro), tout les cellules où c'est écrit "0" remonte en haut de ma liste. Serait-il possible d'écrire un code vba disant de trier seulement le cellules qui ne sont pas 0? Si oui, comment?

Merci à l'avance

Voir fichier

pat01200 · 20 Octobre 2015

Re : Trier par vba valeur autre que 0

Bonsoir,

Teste cette macro modifiée et dis-nous si cela te convient :

Code:

Sub FinTôt()
Range("A1:M1").Select
    Selection.AutoFilter
    Selection.AutoFilter Field:=2, Criteria1:="<>0", Operator:=xlAnd
    Range("B2:M160").Select
    Selection.Sort Key1:=Range("F2"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=True, Orientation:=xlTopToBottom, DataOption1 _
        :=xlSortNormal
    Selection.AutoFilter
    Range("A1").Select
End Sub

pat01200 · 20 Octobre 2015

Re : Trier par vba valeur autre que 0

Re,

Pendant que j'y étais, j'ai fait un peu le ménage dans tes macros, tu devrais y gagner en ergonomie...

Fichier modifié en pièce jointe.

gagnonpeter · 21 Octobre 2015

Re : Trier par vba valeur autre que 0

WOW!!!! Merci bcp, c'Est exactement ce que je voulais!

Merci!!!!

Trier par vba valeur autre que 0

gagnonpeter

XLDnaute Junior

Pièces jointes

pat01200

XLDnaute Occasionnel

pat01200

XLDnaute Occasionnel

Pièces jointes

gagnonpeter

XLDnaute Junior

Discussions similaires

Trier par vba valeur autre que 0

gagnonpeter

XLDnaute Junior

Pièces jointes

pat01200

XLDnaute Occasionnel

pat01200

XLDnaute Occasionnel

Pièces jointes

gagnonpeter

XLDnaute Junior

Discussions similaires

Privacy & Transparency

Privacy & Transparency