Activation filtre VBA

Résolu/Fermé
Signaler
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
-
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
-
Bonjour,

J'aurais aimé savoir s'il était possible d'activé les filtres Excel via VBA.

Je m'explique :

Sur une colonne ou il n'y aurait que des dates, je peux utiliser les filtres pour n'afficher que les date du mois de mars 2014 par exemple.
Est-il possible de traduire cette demande via VBA ? Plus précisément, je souhaite utiliser les filtres pour n'afficher que les lignes pour lesquels la date dans la colonne AR est antérieure ou égale à la date du jour...

Merci d'avance pour votre aide.

1 réponse

Messages postés
16136
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
8 décembre 2021
1 566
Bonjour,


si j'ai compris votre besoin,

adaptez nom de feuille et colonnes

Sub test()
Dim cel As Range, derlig As Integer

With Worksheets("feuil1")
derlig = .Range("B" & Rows.Count).End(xlUp).Row
Set plage = .Range("B2:B" & derlig)
For Each cel In plage
If cel > Date Then
.Rows(cel.Row).Hidden = True
Else
.Rows(cel.Row).Hidden = False
End If
Next cel
End With
End Sub
Messages postés
300
Date d'inscription
vendredi 15 mars 2013
Statut
Membre
Dernière intervention
31 juillet 2018
25
Bonjour,

Je en m'attendais pas à ça... Pour être honnête je penchais plus vers une activation des filtres....
Mais ce que tu proposes avec ta macro fonctionne parfaitement, c'est exactement ce que je voulais. J'en suis donc très content.

Merci beaucoup pour ton aide, bonne journée.