INDEX TRI PETITE VALEUR (2 tris)

P

pat01200

XLDnaute Occasionnel

• 21 Mars 2011

• #2

Re : INDEX TRI PETITE VALEUR (2 tris)

Bonjour Manu62, bonjour le forum !

A priori, un bouton lié à une petite macro qui te fera le tri souhaité devrait solutionner ton problème. J'ai modifé ton fichier en conséquence, dis-moi si cela te convient...

Cordialement,

Patrick

 

Pièces jointes

• index tri dates.xls

  45 KB · Affichages: 38
• index tri dates.xls

  45 KB · Affichages: 40
• index tri dates.xls

  45 KB · Affichages: 39

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 21 Mars 2011

• #3

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

C'est pas mal, mais je voudrais avoir le résultat sur le coté gauche.

L'encadré jaune était juste le résultat attendu.

Merci

Manu

 

Vote positif 0 Vote négatif

P

pat01200

XLDnaute Occasionnel

• 21 Mars 2011

• #4

Re : INDEX TRI PETITE VALEUR (2 tris)

Voilà pour un résultat à gauche !

 

Pièces jointes

• index tri dates.xls

  44.5 KB · Affichages: 40
• index tri dates.xls

  44.5 KB · Affichages: 42
• index tri dates.xls

  44.5 KB · Affichages: 39

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 21 Mars 2011

• #5

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

C'est good, mais j'ai un souci, sans être un souci je pense.

Rejoins mon fichier mais avec mon fichier avec 1 onglet sup.

Peux t'on créer un bouton (cf onglet base) qui fait le même tri de toutes les feuilles (com 2 et com 3).... par la suite.

Manu

 

Pièces jointes

• index tri dates (2).xls

  59 KB · Affichages: 41

Vote positif 0 Vote négatif

P

pat01200

XLDnaute Occasionnel

• 21 Mars 2011

• #6

Re : INDEX TRI PETITE VALEUR (2 tris)

Voilà le tri pour toutes tes feuilles

 

Pièces jointes

• index tri dates2.xls

  60 KB · Affichages: 54

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 21 Mars 2011

• #7

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

C'est good, peux t'on faire le même genre de code, mais lui disant de prendre toutes les feuilles sauf la base et un autre.

Cela évite de modifier le code lors d'une nouvelle feuille.

Merci de ton aide

Manu

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 22 Mars 2011

• #8

Re : INDEX TRI PETITE VALEUR (2 tris)

Bonjour,

Avez vous une petite idée, pour sélectionner toutes les feuilles sauf base par exemple.

Merci de vos infos.

Manu

 

Vote positif 0 Vote négatif

P

pat01200

XLDnaute Occasionnel

• 22 Mars 2011

• #9

Re : INDEX TRI PETITE VALEUR (2 tris)

Qu'apelles-tu "sélectionner" ?

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 22 Mars 2011

• #10

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

En fait, Dans le code :

Application.ScreenUpdating = False
Sheets("COM 2").Select
Range("A4😀104").Select
Selection.Sort Key1:=Range("B5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A1").Select
Sheets("COM 3").Select
Range("A4😀104").Select
Selection.Sort Key1:=Range("B5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A1").Select
Sheets("BASE").Select
Range("G3").Select
Application.ScreenUpdating = True

Cliquez pour agrandir...

Je voudrais au lieu d'avoir un code pour

Application.ScreenUpdating = False
Sheets("COM 2").Select
...
Sheets("COM 3").Select
...
Application.ScreenUpdating = True

Cliquez pour agrandir...

Avoir
sheets (prendre toutes les feuilles).select...

Mais je vuex ne pas prendre la feuille base..


manu

 

Vote positif 0 Vote négatif

P

pat01200

XLDnaute Occasionnel

• 22 Mars 2011

• #11

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut Manu,
Désolé, mais ce que tu demandes n'est pas possible : on est obligé de sélectionner les feuilles que l'on souhaite puis les cellules à trier avant de leur donner une destination. Si tu veux rajouter d'autres feuilles pour faire le même tri, il faut que tu fasses un copier/coller du code correspondant à une feuille
(par ex : Sheets("COM 2").Select
Range("A4104").Select
Selection.Sort Key1:=Range("B5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("A1").Select)
et que tu modifies le nom en fonction de celui que tu auras donner à ta nouvelle feuille (par exemple Sheets("COM 4").Select)

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 22 Mars 2011

• #12

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

Merci de l'info

Je fais en manuel.

Merci à toi

A+

Manu

 

Vote positif 0 Vote négatif