syntaxe pour filtre automatique en vba

[jpp1961]

Bonjour,
Je voudrais créer une macro pour faire un filtre automatique suivant valeur d'une cellule.
Mais j'ai un probléme de syntaxe.
En b1 , j'ai la formule aujourdhui() qui me donne la date du jour
Je voudrai faire le filtre sur la colonne D (4) pour toute les dates inférieur ou égale à la cellule B1
mais ma syntaxe ne doit etre bonne

Selection.AutoFilter Field:=4, Criteria1:="<=&"Range("b1")"
Pourriez-vous me donner la bonne syntaxe

merci d'avance

 

[TempusFugit]

Re : syntaxe pour filtre automatique en vba

Bonjour

Tu peux t'affranchir de l'emploi de la cellule B1

Selection.AutoFilter Field:=4, Criteria1:="<=" & CLng(Date), Operator:=xlAnd

 

[jpp1961]

Re : syntaxe pour filtre automatique en vba

merci pour ta réponse rapide je vais la mettre en application