Autofilter pour filtrer mois et année en cours Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
B
BOUBOU
Jeune membre
Jeune membre
Messages : 43
Inscrit le : 2 août 2015
Version d'Excel : 2007 FR

Message par BOUBOU » 2 août 2015, 14:29

Bonjour à tous,

Je cherche dans la fonction autofilter ce qui permettrait avec les bons critères de filtrer dans une liste importante allant
de 2010 à 2015 le mois et l'année en cours, le mois précédent et enfin le mois prochain.

Exemple : Filtrer les dates correspondant à Août, juillet et septembre 2015

Je n'ai pas trouver les éléments sur internet qui me permettent de réussir seul

J'ai un exemple en pièce jointe

Je vous remercie d'avance pour votre aide
EXE1.xlsm
(22.24 Kio) Téléchargé 130 fois
A
Amadéus
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'620
Appréciations reçues : 79
Inscrit le : 7 mai 2006
Version d'Excel : Office Excel 2003 FR et 2013FR

Message par Amadéus » 2 août 2015, 15:09

Bonjour. Bienvenue sur le Forum
Exemple
Cordialement
EXE1.xlsm
(23.8 Kio) Téléchargé 302 fois
Amadéus vous informe que, pour cause de saturation, il ne peut plus répondre aux messages privés non sollicités.
B
BOUBOU
Jeune membre
Jeune membre
Messages : 43
Inscrit le : 2 août 2015
Version d'Excel : 2007 FR

Message par BOUBOU » 2 août 2015, 15:20

Merci beaucoup Amadéus pour ta réponse mais je n'ai pas été très claire dans ma description

En fait je recherche un bouton qui permette de faire la éxactement la même chose
A
Amadéus
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'620
Appréciations reçues : 79
Inscrit le : 7 mai 2006
Version d'Excel : Office Excel 2003 FR et 2013FR

Message par Amadéus » 2 août 2015, 15:22

Bonjour
Je viens de modifier le fichier initial
cordialement
Amadéus vous informe que, pour cause de saturation, il ne peut plus répondre aux messages privés non sollicités.
A
Amadéus
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'620
Appréciations reçues : 79
Inscrit le : 7 mai 2006
Version d'Excel : Office Excel 2003 FR et 2013FR

Message par Amadéus » 2 août 2015, 15:35

Bonjour
Voir message précédent
Autre méthode avec extraction sur une autre colonne
Cordialement
EXE1_V2.xlsm
(22.02 Kio) Téléchargé 217 fois
Amadéus vous informe que, pour cause de saturation, il ne peut plus répondre aux messages privés non sollicités.
B
BOUBOU
Jeune membre
Jeune membre
Messages : 43
Inscrit le : 2 août 2015
Version d'Excel : 2007 FR

Message par BOUBOU » 2 août 2015, 15:44

Merci pour la réactivité, c'est très éfficace

C'est pratiquement cela mais est-il possible d'avoir le même bouton sans mettre les critères en H1 et F1

critère 1: n (mois en cours) calculer automatiquement par excel
Critère 2: N+1
Critère 3: N-1

Je peux le faire manuellement au travers d'excel (filtrer les mois) ce que je fait pendant les réunions pour connaitre les retards

Mais je voulais savoir je pouvais le faire au travers d'un bouton (VBA) pour plus de rapidité

Merci encore pour ton aide
Avatar du membre
Jean-Eric
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'719
Appréciations reçues : 703
Inscrit le : 27 août 2012
Version d'Excel : 365 Personnel

Message par Jean-Eric » 2 août 2015, 16:16

Bonjour,
A tester.
Cdlt.
xlp - boubou filtre dates vba.xlsm
(31.16 Kio) Téléchargé 186 fois
Jean-Eric

Je ne réponds pas aux M.P. non sollicités.
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'690
Appréciations reçues : 5
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 2 août 2015, 16:26

Bonjour

Avec les fichiers d 'Amadéus il suffit de mettre une formule dans F1 et dans H1 et c'est gagné, plus besoin de modifier ces critères

En F1
=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())-1;1)
En H1
=DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI())+2;0)
B
BOUBOU
Jeune membre
Jeune membre
Messages : 43
Inscrit le : 2 août 2015
Version d'Excel : 2007 FR

Message par BOUBOU » 2 août 2015, 17:05

Merci à tous le PB est presque résolu.......
En effet avec le code de Amadéus et l'astuce de Banzai64 c'est preque bon

J'ai ce bouton qui permet de filtrer tous les GO et G1
Sub Bouton58_Cliquer()
ActiveSheet.Range("$AC$6:$AC$800").AutoFilter Field:=28, Criteria1:=Array("G0", "G1"), Operator:=xlFilterValues

Maintenant je voudrais savoir si possibilité de lier la formule ci-dessus avec le formule de Amadéus ci-dessous
Ce qui permettrait appartir de ce bouton de sélectionner les G0 et G1 dans une colonne et d'afficher les mois (en cours, précédent et prochain) dans une autre colonne

Sub Filtre()
Sup = Range("f1").Value2
Inf = Range("h1").Value2
If Worksheets("Sheet1").AutoFilterMode Then
Worksheets("Sheet1").AutoFilterMode = FalseEnd If
Dates].AutoFilter Field:=1, Criteria1:=">" & Sup, Operator:=xlAnd, Criteria2:="<" & Inf
End Sub

En pièce jointe le fichier avec les explications j'ai mis en rouge ce que je souhaiterais ajouter et dans les colonnes j'ai mis en vert
ce que je dois obtenir si le bouton fonctionne

J'ai mis en commentaire ce que je souhaiterai ajouter dans la macro de Amadéus

Merci à tous pour votre aide

Je dois être à l'extérieure 30 min donc désolé si je ne réponds pas tout de suite
EXE1-5.xlsm
(31.13 Kio) Téléchargé 127 fois
Avatar du membre
Banzai64
Fanatique d'Excel
Fanatique d'Excel
Messages : 16'690
Appréciations reçues : 5
Inscrit le : 21 novembre 2010
Version d'Excel : 2003 FR (learning 2010 - 2013)

Message par Banzai64 » 2 août 2015, 17:29

Bonjour

A vérifier
BOUBOU Filtre V001.xlsm
(32.43 Kio) Téléchargé 189 fois
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message