Filtrer dates en vba

Résolu
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 !

--
Mesurer la masse de sa connerie permettrait dans connaitre sa gravité ;)

2 réponses

  1. Bonjour,
    Essaye plutot:
    tampon = Format((Now(), "dd/mm/yyyy")- 180
    1. erreur, incompatibilité de type..
  2. 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 !