Trier une feuille en fin de macro

kiko974

XLDnaute Nouveau
Bonjour,

J'utilise une macro qui concatène 48 feuilles structurées de façon strictement identique. La première ligne de la feuille synthèse est réservée aux intitulés de colonne.

Quelle est l'instruction à rajouter en fin de macro afin de trier le tableau synthèse par rapport à l'intitulé de la colonne B1 et par ordre croissant?

Je vous remercie pour vos précieuse aide.

Kiko974
 

kiko974

XLDnaute Nouveau
Voici la même demande reformulée, j'espère vraiment que quelqu'un pourra me conseiller:

Je recherche les instructions macro pour:

- sélectionner la totalité de ma feuille (équivalent de CTRL + A)
- puis trier mon tableau en fonction de la colonne B2 (Trier --> par colonne B).

Je vous remercie !!

Kiko.
 

dg62

XLDnaute Barbatruc
Bonjour Kiko974


un code de ce genre peut faire l'affaire si la taille de ton tableau est fixe.


Code:
Sub tri()
    Range('A1:H49').Select
    Selection.Sort Key1:=Range('B2'), Order1:=xlAscending, Header:=xlyes, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub

Message édité par: dg62, à: 06/07/2005 08:38
 

dg62

XLDnaute Barbatruc
re


une autre solution avec plage variable

tableau : colonnes A à H


Code:
Sub tri()
    Range('A1:H' & range('h65535').end(xlup).row).Select
    Selection.Sort Key1:=Range('B2'), Order1:=xlAscending, Header:=xlyes, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub

Message édité par: dg62, à: 06/07/2005 08:17
 

kiko974

XLDnaute Nouveau
Merci beaucoup dg62!

Voici ce que j'ai utilisé pour arriver à mes fins:

Range('A2:AI' & range('h65535').end(xlup).row).Select
Selection.Sort Key1:=Range('C1')



Comment spécifier un tri selon plusieurs critères (je désire classer le tableau par rapport à l'intitulé de colonne C (C1), puis par rapport à l'intitulé de colonne D (D1)?

La syntaxe change beaucoup ?

Merci!

Kiko
 

dg62

XLDnaute Barbatruc
Re Kiko



Bizare ta syntaxe !


Pour trier sur d'autres critères tu utilises key2 et key3 avec ton critère de tri.
Faits un tri en utilisant l'enregistreur de macro et tu n'auras qu'a modifier la premiere pour sélectionner automatiquement ton tableau.


Cordialement
 

Discussions similaires

Réponses
7
Affichages
367

Statistiques des forums

Discussions
312 658
Messages
2 090 619
Membres
104 611
dernier inscrit
Kanette2024