Trier selon plusieurs colonnes

thierryastiti

XLDnaute Nouveau
Bonjour,

j'aimerai creer un bouton associé à une macro qui me trierai (dans cet ordre)

par nature
ensuite par date
ensuite note
enfin par type

Nature Type note date
VIANDE BŒUF 2 2008-06-30
VIANDE MOUTON 1 2008-12-31
VIANDE PORC 2 2008-12-31
VIANDE MOUTON 1 2009-03-31
VIANDE PORC 2 2009-04-15
VIANDE MOUTON 1 2009-06-30
VIANDE BŒUF 3 2009-06-30
VIANDE BŒUF 1 2009-06-30
LEGUME epinard 1 2009-06-15
LEGUME haricot 2 2009-06-30
LEGUME epinard 1 2009-06-30
 

tototiti2008

XLDnaute Barbatruc
Re : Trier selon plusieurs colonnes

Bonjour thierryastiti,

pour faire plus des tris sur plus de 3 champs, il suffit de faire des tris successifs sur 1 champ dans l'ordre inverse.

par exemple, enregistre une macro qui fait :

un tri sur le type
puis
un tri sur note
puis
un tri sur date
puis
un tri sur nature

ça devrait te donner ton résultat...
 

JCGL

XLDnaute Barbatruc
Re : Trier selon plusieurs colonnes

Bonjour à tous,
Salut Toto,
Salut SKoobi :)

Essaye ce code avec des données en A1 à D100 et une ligne de titre en 1:1

Code:
Option Explicit

Sub Tri()
With Range("A1:D100")
    .Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlGuess
    .Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlGuess
    .Sort Key1:=Range("D2"), Order1:=xlAscending, Header:=xlGuess
    .Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess
End With
    Range("A1").Select
End Sub
A+ à tous
 

Discussions similaires

Réponses
2
Affichages
486

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 847
dernier inscrit
Djigbenou