Filtre en macro

Bonjour

j'aurai besoin d'aide pour créer une macro

voila j'ai une liste que je voudrais trier mais par période

voir exemple

14classeur1.xlsm (23.38 Ko)

il y a 2 boutons avant et apres

je vous en remercie à l'avance

Bonjour

A vérifier

Bonjour Banzai64

je te remerci , sa marche bien

parcontre est il possible de triéer aussi les ref

Dans l'exemple au debut il y a que les A10

01000 A10 1 10000

01000 A10 3 25000

01587 A10 4 19500

01000 A10 5 6500

l'ideal c'est d'avoir tous les 01000 regrouper et ensuite le 01587

01000 A10 1 10000

01000 A10 3 25000

01000 A10 5 6500

01587 A10 4 19500

Bonjour

Modifies la 3éme clé de tri

Avant

  Range("B10:G" & Nblg).Sort Key1:=Range("G10"), Order1:=xlAscending, _
                             Key2:=Range("D10"), Order2:=xlAscending, _
                             Key3:=Range("E10"), Order3:=xlAscending, _
      Header:=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
      DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:=xlSortNormal

Après

  Range("B10:G" & Nblg).Sort Key1:=Range("G10"), Order1:=xlAscending, _
                             Key2:=Range("D10"), Order2:=xlAscending, _
                             Key3:=Range("C10"), Order3:=xlAscending, _
      Header:=xlNo, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
      DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:=xlSortNormal

bonjour Banzai64

oui et non maintenant la ref sont regrouper, mais les semaine ne sont pas en ordre croissant exemple

avec votre modif on a :

Date REf Assortiment Semaine QTy

01000 A10 1 10000

01000 A10 5 6500

01000 A10 3 25000

01587 A10 4 19500

au lieu de

Date REf Assortiment Semaine QTy

01000 A10 1 10000

01000 A10 3 25000

01000 A10 5 6500

01587 A10 4 19500

on voit ici, on trie d'abord par l'assortiment cela marche tres bien en fonction des périodes

ensuite la ref votre exemple marche bien

parcontre au niveau des semaine il sont pas dans l'ordre

cordialement

Bonjour

Alors il faut passer par un tri 2007 et +

A tester

Bonjour Banzai64

Merci

Pourrais tu m'expliquer ta macro ligne par ligne

j'e ne comprends pas pourquoi il y a la ligne

.Add Key:=Range("G10:G" & Nblg), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal

Bonjour Banzai64

Je voudrais le retransmettre sur mon vrai tableau

mon probleme c'est que la ref c'est la colonne I au lieu de C

L'assortiment c'est le L au lieu de D

semaine c'est AQ au lieu de E

peux tu m'aider

Bonjour

Combien de fois on demande d'avoir un fichier qui à la même structure que le fichier réel, c'est justement pour éviter ce genre de demande

Le principe est simple

Dans la colonne G (colonne libre accolée au tableau à trier) on recherche et on note à quelle période correspond la semaine

Ensuite on fait le tri

On efface la colonne G

Quelques commentaires dans le code

Si malgré cela tu n'y arrives pas, fournis un fichier

Bonjour Banzai64

je n'arrive pas à le transmettre sur mon tableau

je t'envoie mon tableau

j'ai modifié ta macro pour le trier mais il y a une erreur

peux tu m'aider?

Cordialement

Bonjour

A vérifier ( voir les remarques avec ********* )

Bonjour Banzai64

je vous remercie du travaille effectuer.

tout fonctionne tres bien

je vais travaille dessus et si il y aura des modif je vous demanderai plutard

et encore un Grand Merci

Bonjour Banzai64

j'ai trouvé un erreur.

dans le tableau des périodes

periode 1 periode 2 periode3

A6 20 28 29 31 32 15

B6 20 31 32 32 33 52

C6 20 35 36 40 41 52

D6 20 31 32 32 33 52

E6

dans la periode 3 si je mets 32 jusqu'à la semaine 15 ( la semaine 15 de l'année 2014)

il ne prend pas en compte

cordialement

Bonjour

Bien sur en changeant les règles du jeu

La macro est faite suivant le 1er fichier c'est à dire avec les semaines en ordre croissant

Tu mets les semaines dans le désordre normal que cela ne corresponde plus

Il faut reprendre la macro

Rechercher des sujets similaires à "filtre macro"