Concatener et classer par ordre croissant

M

max.lander

XLDnaute Occasionnel

• 30 Juillet 2012

• #2

Re : Concatener et classer par ordre croissant

Salut,

une solution en PJ.

En espérant que cela te convienne!

@+

 

Pièces jointes

• TEST.xlsx

  9 KB · Affichages: 141
• TEST.xlsx

  9 KB · Affichages: 152
• TEST.xlsx

  9 KB · Affichages: 158

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 30 Juillet 2012

• #3

Re : Concatener et classer par ordre croissant

Bonsoir YesMercy et Bienvenu sur XLD,
Salut max.lander,
une autre Voir PJ
Amicalement

 

Pièces jointes

• NoMercy.xlsx

  10 KB · Affichages: 165

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 30 Juillet 2012

• #4

Re : Concatener et classer par ordre croissant

Bonjour,
à tester sur une plage plus importante pour voir si cela fonctionne :

Code:

=INDEX(B$1:B$9&" "&A$1:A$9;DROITE(PETITE.VALEUR(NB.SI(B$1:B$9;"<"&B$1:B$9)+LIGNE(B$1:B$9)/1000;LIGNE());3))

Validation matricielle.
A+

 

Vote positif 0 Vote négatif

ralph45

XLDnaute Impliqué

• 30 Juillet 2012

• #5

Re : Concatener et classer par ordre croissant

Bonjour tout le monde (ou devrai-je dire bonne nuit ?)

Un test avec le bouton "Go !" (voir PJ)...

A+

 

Pièces jointes

• NOMERCY.xls

  32 KB · Affichages: 84

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 30 Juillet 2012

• #6

Re : Concatener et classer par ordre croissant

Bonjour,
par macro, une possibilité parmi d'autres :

Code:

Sub tri()
Dim T(), DerLig As Long
Application.ScreenUpdating = False
[C:C].ClearContents
DerLig = Range("B" & Rows.Count).End(xlUp).Row
T = Range("A1:B" & DerLig)
Range("A1:B" & DerLig).Sort Key1:=Range("B1"), Order1:=xlAscending, _
Key2:=Range("A1"), Order2:=xlAscending, Header:=xlGuess
For i = 1 To DerLig
Cells(i, 3).FormulaR1C1 = "=RC[-1]&"" ""&RC[-2]"
Next i
With Range("C1:C" & DerLig)
    .Copy
    .PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
End With
With [A1]
    .Select
    .Resize(UBound(T), UBound(T, 2)) = T
End With
Application.ScreenUpdating = True
End Sub

A+

 

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 30 Juillet 2012

• #7

Re : Concatener et classer par ordre croissant

Merci à tous pour vos réponses, en plus super rapides.
Je pense utiliser la solution de R@chid, merci beaucoup.
A bientôt

 

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 30 Juillet 2012

• #8

Re : Concatener et classer par ordre croissant

R@chid, peux tu me dire à quoi serve les {} dans les formules en colonne C.
Lorsque j'adapte ta formule à mon fichier, je supprime les {}, j'ai toujours une erreur #NOMBRE!
Y a t-il une formule cachée ou autre chose ?
Merci de ta réponse.

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 30 Juillet 2012

• #9

Re : Concatener et classer par ordre croissant

Bonjour,

Merci à tous pour vos réponses, en plus super rapides.
Je pense utiliser la solution de R@chid, merci beaucoup.

Cliquez pour agrandir...

pour moi je voie que celle de notre Cher Ami David84 est la plus belle sans colonne Intermédiaire...

R@chid, peux tu me dire à quoi serve les {} dans les formules en colonne C.
Lorsque j'adapte ta formule à mon fichier, je supprime les {}, j'ai toujours une erreur #NOMBRE!

Cliquez pour agrandir...

les {} apparaissent automatiquement après la validation Matricielle, c'est @ dire quand on valide par Ctrl+Maj+Entree Simultanément...

Pour l'erreur Nombre je pense qu'elle vient de PETITE.VALEUR(NB.SI(I$2:I$10;"<"&I$2:I$10);LIGNE()),
car moi j'ai mis la formule en C1 et donc la fonction LIGNE() renvoie dans ce cas 1 et peut être toi tu l'as mis dans une cellule où la ligne est supérieure au nombre de valeurs de la plage...
essayer de Remplacer LIGNE() par LIGNE(A1) ce que je n'aime pas faire pour des raisons pas facile de te les expliquer...
Attention la formule est Matricielle ==> @ valider par Ctrl+Maj+Entree
Amicalement

 

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 30 Juillet 2012

• #10

Re : Concatener et classer par ordre croissant

R@chid
Je suis encore novice en Excel, que ce soit ta formule ou celle de David, j'essaie de la comprendre et de l'adapter à mon fichier Excel mais l'erreur NOMBRE subsiste.
Ma colonne intermédiaire est en DG7G21 et l'affichage du resultat doit se faire en A20:A34.
Que dois je mettre dans LIGNE ou comment utiliser la formule de David que je comprends à demi ?
Merci de ta comprehension

 

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 30 Juillet 2012

• #11

Re : Concatener et classer par ordre croissant

un smiley s'est glissé dans mon message precedent DG7 DG21

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 31 Juillet 2012

• #12

Re : Concatener et classer par ordre croissant

Bonsoir,
en A20, (Pas Testé)

Code:

=INDEX(DG$7:DG$21;EQUIV(PETITE.VALEUR(NB.SI(DG$7:DG$21;"<"&DG$7:DG$21);LIGNES($20:20));NB.SI(DG$7:DG$21;"<"&DG$7:DG$21);0))

@ valider par Ctrl+Maj+Entree
@ tirer vers le bas
@ micalement

 

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 31 Juillet 2012

• #13

Re : Concatener et classer par ordre croissant

Merci Rachid, mais j'ai trouvé une solution entre temps.
Par contre je profite de tes compétences pour te demander une solution sur une formule quasi identique.
Je voudrais trier 3 colonnes, colonne C étant la référence, mais sans les concatener.
Je joins un nouveau fichier test.
A+

 

Pièces jointes

• TEST.xlsx

  12.3 KB · Affichages: 69
• TEST.xlsx

  12.3 KB · Affichages: 60
• TEST.xlsx

  12.3 KB · Affichages: 72

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

• 31 Juillet 2012

• #14

Re : Concatener et classer par ordre croissant

Bonjour,
Une solution parmi d'autres...
J'attends plus d'explication si ça ne te convient pas ....
Amicalement

 

Pièces jointes

• NoMercy_2.xlsx

  14.2 KB · Affichages: 61

Vote positif 0 Vote négatif

N

NoMercy

XLDnaute Nouveau

• 1 Août 2012

• #15

Re : Concatener et classer par ordre croissant

Merci, vraiment toujours aussi parfait Rachid
J'en profite donc encore pour une autre question sur la fonction RECHERCHE (ou une variante RECHERCHEV...), afin de compiler les résultats de 2 tableaux. Peut-être faut-il utiliser d'autres fonctions ?
Ci joint un nouvel exemple
A+

 

Pièces jointes

• TEST.xlsx

  12.9 KB · Affichages: 61
• TEST.xlsx

  12.9 KB · Affichages: 90
• TEST.xlsx

  12.9 KB · Affichages: 62

Vote positif 0 Vote négatif