Filtre automatique sur dates Excel 2003 vs 2007

[job75]

Bonjour à tous,

Sur mon ordi avec Excel 2003 ces macros (élémentaires) fonctionnent bien :

Sub FiltreAuto1()
[A1:A10].AutoFilter 1, Date 'date du jour
End Sub

Sub FiltreAuto2()
[A1:A10].AutoFilter 1, CDate([B2])
End Sub

La date du jour est bien filtrée.

Par contre rien ne marche sur mon portable avec Excel 2010.

J'ai cet ordi depuis peu, je n'avais pas encore testé...

Merci d'avance si vous avez une explication (une option à cocher ?).

A+

 

[job75]

Re : Filtre automatique sur dates Excel 2003 vs 2007

Re,

Bon, c'est instructif, ça marche avec "=" :

Sub FiltreAuto1()
[A1:A10].AutoFilter 1, "=" & Date ' date du jour
End Sub

Sub FiltreAuto2()
[A1:A10].AutoFilter 1, "=" & CDate([B2])
End Sub

Désolé pour le dérangement 🙂

A+

 

[job75]

Re : Filtre automatique sur dates Excel 2003 vs 2007

Re encore,

En fait le filtre recherche les dates formatées :

Sub FiltreAuto1()
[A1:A10].AutoFilter 1, Format(Date, "dddd dd mmmm yyyy") ' date du jour
End Sub

Sub FiltreAuto2()
[A1:A10].AutoFilter 1, Format([B2], "dddd dd mmmm yyyy")
End Sub

A+

 

[job75]

Re : Filtre automatique sur dates Excel 2003 vs 2007

Re, pour en terminer,

et pendant qu'on y est, un petit coup sur le filtre élaboré (avancé) :

Sub FiltreElabore()
[A1:A10].AdvancedFilter xlFilterInPlace, [C1:C2]
End Sub

Il faut passer par le critère =A2=B$2

Noter qu'on n'a pas besoin de se casser la tête avec les formats...

A+