Filtrage auto par macro sur critère variable

[white-spirit]

Bonsoir le forum,

je coince sur un petit détail de syntaxe vba pour effectuer un filtrage d'une liste.

l'enregistrement de la manip me donne le code suivant :

Sub Macro3()

Range("B5:G24").Select
Selection.AutoFilter
Selection.AutoFilter Field:=2, Criteria1:="<=12", Operator:=xlAnd
End Sub

le chiffre 12 sert donc de critère de filtrage.

au lieu de le rentrer "en dur" comme ici, je souhaite récupérer la valeur contenue dans la cellule I1, renseignée par un collage lié ... mais je n'arrive pas à l'écrire en vba ....

Si quelqu'un connait une solution, je l'en remercie par avance.

Cordialement

WS

 

[Compte Supprimé 979]

Re : Filtrage auto par macro sur critère variable

Salut White-spirit 😉

Tu peux essayer

Sub Macro3()
  Range("B5:G24").AutoFilter Field:=2, Criteria1:="<=" & Range("I1"), Operator:=xlAnd
End Sub

Les "select" ne sont pas nécessaire 😉

A+​

 

[white-spirit]

Re : Filtrage auto par macro sur critère variable

Merci BrunoM45, ta solution fonctionne parfaitement.

Bien cordialement.

WS