INDEX TRI PETITE VALEUR (2 tris)

[Manu62]

Bonjour,

Ci joint un petit fichier avec une recherche en feuil2.

Pour la feuille BASE
J'alimente la base tous les jours.... a partir d'un fichier.
Tous les 15 jours j'ajoute des données manuellement. (à la suite) pour que le n° de col A se suit...

Pour la feuil 2, la formule trouvé sur le fil ma va bien sauf que 15 jours plus tard je m’aperçois d'un souci.

Je voudrais ajouter en même temps que le tri par n°, un tri par date, mais je bute. Je ne peux pas faire de tri...

L'exemple de ce que je recherche et dans l'encadré jaune.

Merci de votre petite aide.

Manu

 

[pat01200]

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

 

[Manu62]

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

 

[pat01200]

Re : INDEX TRI PETITE VALEUR (2 tris)

Voilà pour un résultat à gauche !

 

[Manu62]

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

 

[pat01200]

Re : INDEX TRI PETITE VALEUR (2 tris)

Voilà le tri pour toutes tes feuilles

 

[Manu62]

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

 

[Manu62]

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

 

[pat01200]

Re : INDEX TRI PETITE VALEUR (2 tris)

Qu'apelles-tu "sélectionner" ?

 

[Manu62]

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

Je voudrais au lieu d'avoir un code pour

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

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

Mais je vuex ne pas prendre la feuille base..


manu

 

[pat01200]

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)

 

[Manu62]

Re : INDEX TRI PETITE VALEUR (2 tris)

Salut,

Merci de l'info

Je fais en manuel.

Merci à toi

A+

Manu