Discussion :

[fikou]

Bonjour,
Je désire trier une feuille Excel.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Range("C4:M63").Select
    Selection.Sort Key1:=Range("M4"), Order1:=xlDescending, Key2:=Range("L4") _
        , Order2:=xlDescending, Key3:=Range("K4"), Order3:=xlDescending, Header _
        :=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

J'ai 11 colonnes, je trie sur les 3 dernières.
Lors du tri si la dernière colonne est à 0 le tri est correct.
J'aimerais prendre en compte la colonne C.
Elle peut être renseignée mais afficher 0 dans M
Elle peut ne pas être renseignée mais aussi afficher 0 dans M
J'aimerais que les colonnes C renseignées soit placée avant les non renseignées.
Dans la colonne C ce sont des donnée texte ou null

J'espère que j'ai été limpide...
Je reste à dispo
Merci d'avance
FikoU

[Philippe Tulliez]

Bonjour,

J'espère que j'ai été limpide..

En ce qui me concerne, pas vraiment.

Un tri multi-colonnes est hiérarchique et si vous voulez ajouter des critères, utilisez le filtre en plus.

[fikou]

Alors pour être plus explicite voici une capture d'écran.
Je ne comprend pas pourquoi ces zéro ne sont pas en fin de tri

[Philippe Tulliez]

Bonjour,
Pour pouvoir comprendre, pouvez-vous faire une capture d'écran de la boite de dialogue de Tri ?

[fikou]

Bonjour,
Merci pour vos réponses.
Je ne passe pas par la boîte de dialogue de tri, tout par code ou alors j'ai pas compris un truc.
Je débute en VBA Excel, J'ai par le passé fais du VB.NET...

[fikou]

Le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
  Sheets("Individuel").Select
    Range("C4:M63").Select
    Selection.Sort Key1:=Range("M4"), Order1:=xlDescending, Key2:=Range("L4") _
        , Order2:=xlDescending, Key3:=Range("K4"), Order3:=xlDescending, Header _
        :=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    Range("A1:A1").Select

Dans la boîte de dialogue Trier il y à déjà des instructions ce n'est pas moi qui les ai saisi ?