formule pour trier ?

[bobo]

Bonjour,
voilà ma question :
J' ai un groupe de cellules A5...A10
Chacune contient un chiffre.

Je voudrais avoir cette colonne dupliquée à droite mais dont les cellules sont triées par ordre croissant et affichées en une rangée.
Quelle est la formule ?
Quelle est celle pour l' ordre décroissant ?
Merci d' avance.

 

[Monique]

Re bonjour,

Quelques solutions dans le fichier

 

[Moa]

Voilà, c'est très facile ave l'enregistreur de macros



Sub CroissantDecroissant()
'
' CroissantDecroissant Macro
' Macro enregistrée le 01/02/2003 par Moa
'

'
Range("A5:A12").Select
Selection.Copy
Range("C5").Select
Range("E5").Select
ActiveSheet.Paste
Application.CutCopyMode = False

Range("C5").Select
Selection.Sort Key1:=Range("C5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Range("E5").Select
Selection.Sort Key1:=Range("E5"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

End Sub

Voilà

@ +

moa

 

[bobo]

merci pour vos reponses.
malheureusement, je n' ai pu avoir accès à vos pièces jointes.
En particulier Monique,si je pouvais avoir les formules dans le message plutot que en piece jointe, ce serait parfait.
Merci.

 

[Monique]

Re

D'accord pour les formules dans le message

Si l'on est sûr qu'il n'y a que 6 nbres et qu'aucune cellule n'est vide
1) Tri par ordre croissant
=GRANDE.VALEUR($A$5:$A$10;{6;5;4;3;2;1})
=PETITE.VALEUR($A$5:$A$10;{1;2;3;4;5;6})
1) Tri par ordre décroissant
=PETITE.VALEUR($A$5:$A$10;{6;5;4;3;2;1})
=GRANDE.VALEUR($A$5:$A$10;{1;2;3;4;5;6})
Sélectionner les 6 cellules en même temps (autant de cellules qu'il y a de nombres à trier)
Ecrire la formule
Valider en appuyant simultanément sur ctrl + maj + entrée
(formules matricielles)
Attention : ce sont des accolades [ ] qu'il y a autour des chiffres 1;2;3;etc

S'il y a des cellules vides
Nombres à trier de A5 à A20
Laisser vide B4 et C4
1) Tri par ordre croissant
En B5 :
=SI(NB($A$5:$A$20)-NB(B$4:B4)>0;GRANDE.VALEUR($A$5:$A$20;NB($A$5:$A$20)-NB(B$4:B4));"")
à copier coller vers le bas jusqu'à B20
1) Tri par ordre décroissant
En C5 :
=SI(NB($A$5:$A$20)-NB(C$4:C4)>0;PETITE.VALEUR($A$5:$A$20;NB($A$5:$A$20)-NB(C$4:C4));"")
à copier coller vers le bas jusqu'à C20

 

[Moa]

Voilà, je t'ai fait un classeur "maison", avec un exemple par macro et un par formules

je te l'envoie par mail.

@ +

Moa

 

[bobo]

ok.
encore merci à vous.
a+
bobo