Plage décroissante excel

Résolu
ath80 Messages postés 234 Statut Membre -  
ath80 Messages postés 234 Statut Membre -
Bonjour,

Je voudrais ranger dans l'ordre une plage données.

http://cjoint.com/data3/3CmrRpysDGL.htm

La macro utilisée est la macro1 et je l'ai affecté au bouton mettre dans l'ordre décroissant dans la feuille Calculs. Je voudrais ranger dans l'ordre la plage E1253 à E1291.

Voici la macro utilisée:

Sub Macro1()
Sheets("Calculs").Select
Range("E1253:K1291").Select
Selection.Sort Key1:=Range("F1253"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub

Ca marche quand je sélectionne Temps de cycle (H23 de la feuille Accueil) et Janvier (J23 de la feuille Accueil), tout est bien dans l'ordre décroissant.
Mais quand je sélectionne Rebut et Janvier c'est décroissant qu'à partir de la deuxième valeur. Même si la première valeur est inférieure, elle reste toujours en premier.

Merci de votre aide.

A voir également:

3 réponses

chossette9 Messages postés 6855 Statut Contributeur 1 311
 
Bonjour,

je sais que quand je dois faire des tris comme ceci, je prends toujours en compte la ligne de tri. Donc remplace RANGE("F1253") par RANGE("E1253"), voir si ça fonctionne.

Cordialement.
0
ath80 Messages postés 234 Statut Membre 9
 
Bonjour,

Non ça classe suivant la liste des OP dans l'ordre décroissant, moi je veux classer la colonne juste à droite.

Cordialement.
0
chossette9 Messages postés 6855 Statut Contributeur 1 311
 
Oups, je me suis loupé, j'ai changé le numéro de colonne au lieu de la ligne...
Change donc Range("F1253") par Range("F1252").

Si ça ne marche pas non plus, ben.... je laisse ma place à quelqu'un d'autre :)
0
ath80 Messages postés 234 Statut Membre 9
 
Je vous remercie beaucoup, c'est ça :)

Bonne soirée.
0