Pb Macro de filtrage auto en Excel 2003Résolu/Fermé

Question

Bonjour,  

J'ai un souci d'affichage des données d'un filtre automatique executé à l'ouverture d'un fichier excel. 

J'utilise le code suivant : 

Private Sub Workbook_Open() 

  Selection.AutoFilter Field:=7, Criteria1:="<=" & Date, Operator:=xlAnd 

End Sub 

Mais les données ne s'affichent pas il me faut aller ouvrir à la main le filtre automatique pour valider l'affichage. 
En fait la macro fonctionne et fait bien le tri des données mais les lignes restent masquées. 

J'utilise Excel 2003 SP3. 

Je ne vois pas comment résourdre ce problème. 

Configuration: Windows XP / Internet Explorer 7.0

pilas31 · Answer

Bonjour,

Oui, c'est un problème récurrent dans Excel VBA qui ne tient pas compte du format de date "régional" mais qui attends toujours les dates en format américain.

Donc la solution est de formater la date comme ceci :

Selection.AutoFilter Field:=7, Criteria1:="<=" & Format(Date, "mm/dd/yyyy"), Operator:=xlAnd

et ça devrait fonctionner.

A+

LBO · Answer

Merci pour l'info et effectivement le pb est résolu d'autant que ça marchait bien avec Excel 2007 et 2010 c'était très perturbant.

Merci encore.

Pb Macro de filtrage auto en Excel 2003

2 réponses

Newsletters