Soucis avec les tris

[GGPS58]

Bonjour,

J'ai un petit soucis de tri (Voir fichier joint)
Je recopie des valeurs d'une feuille à une autre, puis je tri chaque colonne par ordre croissant indépendemment les unes des autres.
Bizarrement le tri s'effectue correctement sur certaines colonnes mais pas sur d'autres.
Si vous avez une idée ...

D'avance merci

 

[Baside]

Re : Soucis avec les tris

Bonjour le Forum,

Le début de la macro modifié:

Range("A3: D" & Range("D65536").End(xlUp).Row).Select
Selection.Copy
Sheets("Analyse").Activate
Range("B5").Select
ActiveSheet.Paste
Range("B5:E" & Range("E65536").End(xlUp).Row).Select
Application.CutCopyMode = False
Selection.Sort Key1:=Range("B5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Amicalement, Hervé.

 

[GGPS58]

Re : Soucis avec les tris

Merci, mais cela ne fonctionne pas.
Votre macro copie et tri l'ensemble du tableau en conservant une correspondance linéaire.
Je souhaites classer individuellement chaque colonnes. Je n'ai plus besoin de la correspondance linéaire de ma feuil1.
Je continue à chercher.

 

[Baside]

Re : Soucis avec les tris

Re,

Pas bien réveillé alors, ou c'est ce maudit mal de tête...

Je regarde à nouveau.

 

[pierrejean]

Re : Soucis avec les tris

bonjour GGPS58

Salut Baside

Ta macro corrigée (xlNo au lieu de xlGuess) et en module 2 telle que je l'aurais ecrite

 

[Baside]

Re : Soucis avec les tris

Re,

Ah, j'allais mettre en ligne...

Trop tard lol

A plus

Je regarde ta solution

Ma solution est un peu différente, je faisais le tri avec une ligne de titre et cela met direct dans l'ordre.

 

[GGPS58]

Re : Soucis avec les tris

Merci à tous, cela fonctionne parfaitement.