Classement vertical.

[JJ1]

Bonjour,

J'ai un tableau où figurent des valeurs pour les données A et B (G1:K3)
Je souhaiterais les reporter en colonne C et D par valeurs décroissantes.
Merci de votre aide.
Bonne journée

 

[Tibo]

Re : Classement vertical.

Bonjour,

En C2 :

=GRANDE.VALEUR($G$2:$K$2;LIGNES($1:1))

à recopier vers le bas

Même principe pour D2

@+

 

[Paritec]

Re : Classement vertical.

Bonjour Tibo JJ1
et en vba aussi si besoin

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim a As Variant
with feuil1
    a = .Range("F2:K3")
   .Range("C1:D6") = WorksheetFunction.Transpose(a)
   .Range("C1:C6").Sort Key1:=.Range("C1"), Order1:=xlDescending, Header:=xlYes
   .Range("D1:D6").Sort Key1:=.Range("D1"), Order1:=xlDescending, Header:=xlYes
end with
End Sub

bonne journée a tous
Papou 🙂

 

[hoerwind]

Re : Classement vertical.

Bonjour, salut Paritec et Tibo,

Je n'ai pas compris la même chose que Tibo.

C2 :

=INDEX($G$1:$K$1;EQUIV(PETITE.VALEUR($G$2:$K$2;LIGNE()-1);$G$2:$K$2;0))

D2 :

=INDEX($G$1:$K$1;EQUIV(PETITE.VALEUR($G$3:$K$3;LIGNE()-1);$G$3:$K$3;0))

Sous réserve qu'il n'y ait pas de doublons sur la même ligne.

 

[JJ1]

Re : Classement vertical.

Bonsoir Tibo, Papou, Hoerwind,
J'ai utilisé la formule d'Hoerwind (index/equiv) qui fonctionne très bien.
Merci
bonne soirée