Discussion :

[Aurianelm]

Bonjour à tous,

Voilà, je voudrai trier mon fichier qui bien sûr contient des entêtes avec une macro VBA.

J'ai essayé comme ceci (avec l'enregistreur de macro)

Code :

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

1
2
3
4
5
6
Cells.Select
    Selection.Sort Key1:=Range("C2"), Order1:=xlAscending, Key2:=Range("B2") _
        , Order2:=xlAscending, Key3:=Range("L2"), Order3:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
        xlSortNormal

Mais ça ne fonctionne pas, la macro trie mon fichier comme s'il n'avait pas d'entête...

Auriez-vous une solution ?

Merci par avance.

[mercatog]

Regarde la paramètre Header

Ton code sera

Code :

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

1
2
3
4
With Worksheets("Feuil1")                        ' à adapter
    .UsedRange.Sort Key1:=.Range("C2"), Order1:=xlAscending, Key2:=.Range("B2"), _
                    Order2:=xlAscending, Key3:=.Range("L2"), Order3:=xlAscending, Header:=xlYes
End With

Xlyes, la zone à trier à un entête

[Aurianelm]

Merci ça marche nickel