Trier des dates ?

bonjour antoine,
fais un essai avec

Sub Trier()
Range("A1").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

nickel, merci albert. ça trie a merveille ;-)
Mais juste histoire de ne pas re-poser de question débille j'aimerais comprendre ou ce situe l'erreur dans ce code ( qui meme si il ressemble a celui que tu fourni ce marche pas ) apparament la différence est dans la méthode de sélection, mais je ne comprend pas comment ça peut changer quelque chose

sub trier2()
Columns("A:A").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
end sub

en tout cas merci du coups de main !

antoine

je n'ai pas d'explication particulière à te donner, c'est une habitude que j'ai prise

peut-être que pour trier sur A:A, il faut un titre à la colonne