Discussion :

[lollo]

j'ai besoin de trier les données contenues dans une plage. en utilisant le modèle de code que me donne l'enregistreur de macros, il se produit une erreur 1004 sur la ligne 2 du modèle.

Code :

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

1
2
3
4
5
6
Sheets("données").Select
Range("D2").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Sort Key1:=Range("D2"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

il est à noter que si je supprime la ligne 1, "Sheets("données").Select", le code s'exécute correctement, mais sur la page active. Si je sélectionne la feuille "données" autrement, par exemple
"Sheets(2).Select", il se produit aussi une erreur 1004.

comment dois je sélectionner la plage à trier ?

[wilfried_42]

bonjour

ta feuille ne serait elle pas masquée ?

de toute facon, les select ne sont pas utiles :

Code :

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

1
2
3
Sheets("données").Range("D2:D" & sheets("données").range("D2").end(xlup).row).Sort Key1:=Sheets("données").Range("D2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

[lollo]

c'est bon, j'ai juste modifié end(xldown) au lieu de end(xlup)

merci

[wilfried_42]

re:

ho oui excuse, xlup est un réflexe comme je pars toujours de la fin (en cas de cellule vide dans mon tableau)