Classer par ordre croissant de date et à partir de la 3e ligne Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
b
basileB
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 7 décembre 2017
Version d'Excel : 2013

Message par basileB » 22 mars 2019, 19:34

Bonjour Team,

Je souhaite faire un reporting de mes ventes dans la feuille reporting, et ressortir les états de janvier et février dans les feuilles janvier et février.

Mais je n’arrive pas à classer par ordre croissant de “date” et à partir de la 3e ligne de chaque mois (Janvier et février).

Merci d’avance,
test.xlsm
(209.17 Kio) Téléchargé 5 fois
g
gigi777
Membre dévoué
Membre dévoué
Messages : 523
Appréciation reçue : 1
Inscrit le : 19 septembre 2007
Version d'Excel : 2010, 2013

Message par gigi777 » 22 mars 2019, 20:13

Bonsoir,
je ne sais pas si ca répond à la recherche...
1/ sélectionner la colonne A
2/dans l'onglet "données" (en haut), cliquer sur l'icone
Annotation 2019-03-22 201120.jpg
Annotation 2019-03-22 201120.jpg (936 Octets) Vu 97 fois
dans la pop up qui s'ouvre", choisir "étendre la sélection" et cliquer sur "Tri".

Ca classe par date la colonne A, en gardant la correspondance dans les autres colonnes...
b
basileB
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 7 décembre 2017
Version d'Excel : 2013

Message par basileB » 22 mars 2019, 20:25

Bonsoir gigi777,

Non c'est pas ce que je veux faire.

J'ai une feuille pour mon reporting, et je récupère les données de janvier dans la feuille janvier, puis février dans la feuille février.

Mais dans les feuilles janvier et février les ne sont pas dans l'ordre croissant, et en plus elles occupent la même ligne que dans la feuille reporting.

D'où mon besoin.

Cdlt,
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 14'975
Appréciations reçues : 881
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 22 mars 2019, 23:39

Bonjour,

trie les données sur la feuille reporting, les autres feuilles seront triées.

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 14'975
Appréciations reçues : 881
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 22 mars 2019, 23:56

Je ne procéderais pas comme tu l'as fait toutefois, j’utiliserais plutôt un filtre avancé comme ceci :
Sub filtrer()
    Application.CutCopyMode = False
    Sheets("Reporting").Range("A4:L1000").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Range("B1:C2"), CopyToRange:=Range("A4:L4"), Unique:=False
End Sub

Sub trier()
    Range("A4").Select
    ActiveSheet.Sort.SortFields.Clear
    ActiveSheet.Sort.SortFields.Add Key:=Range("A4"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortTextAsNumbers
    With ActiveSheet.Sort
        .SetRange Range("A5:L" & Cells(Rows.Count, 1).End(xlUp).Row)
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub
et sur chaque feuille
Private Sub Worksheet_Activate()
filtrer
trier
End Sub
test.xlsm
(147.23 Kio) Téléchargé 5 fois
1 membre du forum aime ce message.

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
Avatar du membre
eriiic
Passionné d'Excel
Passionné d'Excel
Messages : 9'718
Appréciations reçues : 446
Inscrit le : 7 février 2010
Version d'Excel : 2010fr

Message par eriiic » 23 mars 2019, 00:41

Bonjour,

pourquoi créer de nouvelles feuilles alors qu'un simple filtre t'affiche la même chose ?
eric
test (1).xlsm
(212.29 Kio) Téléchargé 2 fois
En essayant continuellement, on finit par réussir.
Donc plus ça rate, plus on a de chances que ça marche.
(les Shadoks)

En plus du merci (si si, ça se fait !!!), penser à mettre en résolu. Merci
b
basileB
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 7 décembre 2017
Version d'Excel : 2013

Message par basileB » 23 mars 2019, 12:22

Merci à tous,

Un Merci particulier à Steelson.

Le code fonctionne à merveille :good: !!!

Cdlt,
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message