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