Re : Filtre avec variable
Bonjour,
Il faut que y soit un format date ou un N° de série date (par ex aujourd'hui = 39952)
Le mars-2009 récupéré par macro ne fontionnera pas tel quel.
donc :
y=39952
Selection.AutoFilter Field:=1, Criteria1:=">=janv-2009", Operator:=xlAnd , Criteria2:="<=" & y
ou bien y = #1/3/2009#
Inférieur à Mars 2009 doit normalement correspondre à <#1/3/2009#
Macro =>
Sub Test()
y = Format(DateSerial(2009, 3, 1), "mm/dd/yyyy")
'ou
'y = #1/3/2009#
'ou
'y = 39873
Range("A1").AutoFilter Field:=1, Criteria1:="<" & y
End Sub
Si c'est une cellule, tu peux faire =>
y=range("A1").Value2
Range("A1").AutoFilter Field:=1, Criteria1:="<" & y
Peux tu préciser comment est calculé y ?
Voir le fichier joint