Tri par date & fin de ligne

Bonjour,

Je cherche une simple macro qui me trie par date la colonne C et qui me renvoie le curseur en fin de colonne C écrite

Merci à tous.

Bonjour

Sub Trier()
Range("A2:G" & [C65000].End(xlUp).Row).Select
Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Range("C2").End(xlDown).Offset(1, 0).Select
End Sub

Cordialement

Merci Amadéus !