Discussion :

[arapao]

Bonjour,
je souhaiterais trier des données dans une feuille excel par date et ensuite copier le resultat dans une nouvelle feuille.
j'ai essayer en enregistrant une macro avec la fonction " filtre automatique" mais la fonction ne se valide pas quand je lance la macro.

j'espere avoir ete assez clair.
merci

[Singular]

Le filtre automatique n'est pas la solution. Il faut enregistrer une macro en cliquant le menu 'Données/Trier...'

Un exemple que tu peux utiliser:

Code :

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

1
2
3
4
5
6
7
Sub TrierDateEtCopier()
    Worksheets("Feuil1").UsedRange.Sort Key1:=Worksheets("Feuil1").Range("A1"), Order1:=xlDescending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
    Worksheets("Feuil1").UsedRange.Copy
    Worksheets("Feuil2").Paste Destination:=Worksheets("Feuil2").Range("A1")
End Sub