Tri sur vba

bbmarcus

XLDnaute Occasionnel
Bonjour le forum !

Alors voila: j'utilise un commandbutton pour faire un tri.
Lorsque je le fait avec 3 critères, ca marche, mais dès que je rajoute un Key4, ca ne marche plus!
Je suis sur de passer à coté d'une évidence, mais un peu d'aide serai la bien venue !
Voila mon code...

Selection.Sort Key1:=Range('C15'), Order1:=xlAscending, Key2:=Range('D15') _
, Order2:=xlAscending, Key3:=Range('G15'), Order3:=xlAscending _
, Key4:=Range('H15'), Order4:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

Merci à tous!

bbmarcus
 

Baside

XLDnaute Impliqué
Bonsoir bbmarcus, le Forum,

Sitout ton code est là, quelle est la plage de cellules à mettre en ordre ?

Avec:

Sub MettreEnOrdreColonnesCDG()

Range('C1:C15').Sort Key1:=Range('C1'), Order1:=xlAscending
Range('D1:D15').Sort Key1:=Range('D1'), Order1:=xlAscending
Range('G1:G15').Sort Key1:=Range('G1'), Order1:=xlAscending


End Sub

Les colonnes C D G de 1 a 15 sont mises en ordre, il est possible de rajouter des lignes.

Bonne soirée, Baside
 

bbmarcus

XLDnaute Occasionnel
Bonsoir Baside, bonsoir à tous,

pour répondre à ta question, je veux faire un tri sur une plage B1:m13000 car je rajoute continuellement des lignes.

Par contre, tout ce qui est sur les lignes 1, 2, 3..... vont ensemble...tu vois comme par ex
ligne 1 martin avec en colonne nom, adresse, téléphone.....

Je veux trier par colonnes sous certaines conditions...
D'abord par ex par nom, puis dans ce tri par adresse, puis encore dans ce tri par tel.

J'ai essayé ta méthode et elle me fait un tri de chaque colonne en mélangant les contenus.....

Merci en tout pour ton aide....si tu as un autre truc, il est le bienvenu !

@+

bbmarcus
 

bbmarcus

XLDnaute Occasionnel
Salut le forum, salut baside,

désolé de répondre seulement maintenant, mais bcp de boulot !

Bref, voila un dossier rapide sur lequel je veux faire faire un tri (le vrai dossier est un truc de taf...impossible de l'envoyer même soft !)

Tu disait avoir une autre formule?

bbmarcus :p
 

bbmarcus

XLDnaute Occasionnel
Salut le forum, salut baside,

j'avais oublié la pièce jointe ! la voici avec le même message....

désolé de répondre seulement maintenant, mais bcp de boulot !

Bref, voila un dossier rapide sur lequel je veux faire faire un tri (le vrai dossier est un truc de
taf...impossible de l'envoyer même soft !)

Tu disait avoir une autre formule?

bbmarcus [file name=Classeur2_20050510105016.zip size=9224]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur2_20050510105016.zip[/file]
 

Pièces jointes

  • Classeur2_20050510105016.zip
    9 KB · Affichages: 10

Baside

XLDnaute Impliqué
Bonsoir bbmarcus, le Forum,

Dans le fichier joint, il y a les annotations pour l'utilisation.
Les données n'étaient pas nécessaires, c'est pou la structure pour que tu puisse adapter directement sans te casser la tête.

Baside [file name=TriBaside.zip size=10453]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/TriBaside.zip[/file]
 

Pièces jointes

  • TriBaside.zip
    10.2 KB · Affichages: 19

Discussions similaires

Statistiques des forums

Discussions
312 211
Messages
2 086 294
Membres
103 171
dernier inscrit
clemm