classer des dates

[nrdz83]

Bonsoir à tous voici un code qui classe des dates dans ma colonne J du plus grand vers le plus petit je souhaite classer du plus petit vers le plus grand comment je dois modifier mon code ? d'avance merci à tous amitiés .

Sub classerparordreVA()

Columns("A:T").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("J2") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Range("A2").Select
End Sub

 

[PascalXLD]

Re : classer des dates

Bonjour

essaies

Order2:=xlDescending

 

[nrdz83]

Re : classer des dates

merci j'essaye amitiés

 

[nrdz83]

Re : classer des dates

ça change pas pascal xld , merci

 

[PascalXLD]

Re : classer des dates

Re

Ton code classe d'abord par la colonne A puis la J

ET si tu veux la colonne J dans l'autre sens il faut

Sub classerparordreVA()

Columns("A:T").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("J2") _
, Order2:=xlDescending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom
Range("A2").Select
End Sub

Mais tu as toujours la colonne A de classer en premier

 

[nrdz83]

Re : classer des dates

merci pascal vais voir si j'y arrive mais amitiés bye