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
    0
    1. erreur, incompatibilité de type..
      0
  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 !
    0