Discussion :

[dalo02]

bonsoir
je bloque sur un pb de date
je veux filter les feuilles d'un classeur par l'intermediaire d'une cellule
la colonne a filtrer et la cellule sont remplies a l'aide de formules
et sont formatees "mmm,yy"
la formule en A1 est ='F1'!A1 et col 9 =EDATUM(G6;H6)
resultat j'ai par ex. en A1 Dec.11 ainsi que dans la col9
j'ai essaye avec formula,text ect.. a la place de Value mais sans succes
merci pour votre aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
With ws
    Rows("5:5").AutoFilter Field:=9, Criteria1:="=" & Range("a1").Value

[AlainTech]

Bonjour,

Il ne manque pas un point devant Rows et Range?

[Daniel.C]

Bonsoir,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Range(.[I5], .Cells(.Rows.Count, 9).End(xlUp)).AutoFilter Field:=1, Criteria1:="=" & Format([A1], "m/d/yyyy")

[SfJ5Rpw8]

Bonsoir,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Range(.[I5], .Cells(.Rows.Count, 9).End(xlUp)).AutoFilter Field:=1, Criteria1:="=" & Format([A1], "m/d/yyyy")

il manque juste des . devant les .row et .range comme dit plus haut par Alain ... utiliser la feuille courante comme ici avec le [A1] provoque les mêmes erreurs que lorsqu'on utilise Range ou Row sans préciser la feuille..