Pb Macro de filtrage auto en Excel 2003
Résolu
LBO
-
LBO -
LBO -
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.
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.
2 réponses
-
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+
-
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.
