Filtrer dates en vba

Résolu
eljojo_e Messages postés 1255 Statut Membre -  
eljojo_e Messages postés 1255 Statut Membre -
Bonjour,

Je cherche à filtrer des dates en vba access. J'ai essayer ca mais ca fonctionna pas..

tempon = Format((Now() - (30 * 6)), "dd/mm/yyyy")
Me.Filter = "[Validité]>=" & tempon
Me.FilterOn = True

je voudrais que cela retire tout les enregistrements dont le validité est dépassé depuis 6 mois.

Merci !

2 réponses

le meruvien Messages postés 1414 Statut Membre 40
 
Bonjour,
Essaye plutot:
tampon = Format((Now(), "dd/mm/yyyy")- 180
0
eljojo_e Messages postés 1255 Statut Membre 155
 
erreur, incompatibilité de type..
0
eljojo_e Messages postés 1255 Statut Membre 155
 
Ok j'ai trouvé la réponse.

Il faut convertir la date en numérique en déclarant une 2ème variable en single.


dim tempon as date, tempon2 as single
tempon = Format((Now() - (30 * 6)), "dd/mm/yyyy")
tempon2 = tempon
Me.Filter = "[Validité]>=" & tempon2
Me.FilterOn = True

et ça marche !
0