[VBA] - Filtre Automatique sur DATE / Heure

Question

Bonjour à tous et toutes...
cette question à déjà été posée à plusieurs reprises (sur pleins de sites...) mais les réponses données ne fonctionnent pas toutes.

Bref...

Je me retrouve avec une colonne contenant des dates sour le format : "dd/mm/yyyy HH:mm:ss"
Je désire faire un filtre Auto (en VBA) sur cette colonne avec comme critère :
"< ma_date"
et Ma_date = "19/05/2010 10:15:00"

Le critère est bien interprété par Excel puisque si je retourne dans le filtre le critère apparait bien et le filtre se fait si je valide "manuellement". 


Crit_DAT = "<" & Ma_Date
Selection.AutoFilter
Selection.AutoFilter Field:=Num_COl, Criteria1:=Crit_DAT, Operator:=xlAnd


J'ai essayé de forcer le format genre : cdate(format(Ma_date,"dd/mm/yyyy HH:mm:ss") mais ça ne change rien.
Si je passe avec un clng(Ma_date)... les heures ne sont plus prises en compte...
... Que faire ?


Par avance merci pour votre aide.

Cordialement,
Jordane,

cs_zeps2 · Answer

salut Jordane,

en principe le format est en français "jj/mm/aaaa"
C'est bête mais as tu essayé?
Comment tapes-tu ton choix de date ?
par une textbox ? dans le code?

Zeps

jordane45 · Answer

Bonjour Zep,

 Ma_date.. est une variable calculée dans mon code.. 

Ma_Date = DateAdd("h", -2, Now())

J'ai essayé le formatage de ma date dans le code 
Ma_date = cdate(format(ma_date,"dd/mm/yyyy HH:mm:ss"))

J'ai également "forcé" ce format ("jj/mm/aaaa hh:mm:ss"  sur les cellules Excel de ma colonne 'dates'
Rien n'y fait.

Ce qui est "marrant" c'est que lorsque je lance mon code... rien ne se passe (ou alors tout est masqué).. mais si dans ma feuille excel je clique sur le filtre / Personnalisé... le critère apparait et on peut le valider (comme quoi mon critère est bon..c'est juste Excel qui ne l'active pas à la fin ! ).



Cordialement,
Jordane,

[VBA] - Filtre Automatique sur DATE / Heure

2 réponses

Votre réponse

Discussions similaires