VBA Access format date

Fermé
Giant - 7 avril 2007 à 12:05
 Roots69 - 7 avril 2009 à 21:50
Bonjour

je crée un formulaire access où je mets comme format "short date". Je voudrais compter le nombre de date dans une table inférieur à celle entrée dans le formulaire. Le champ date de ma table est lui aussi en "short date".
Je passe donc par un code VBA :

Private Sub cmdOK_Click()

Dim sql As String
Dim db As DAO.Database
Dim req As DAO.Recordset

Set db = CurrentDb()

sql = "select count(etude.code_projet) as total"
sql = sql + " FROM etude"
sql = sql + " WHERE etude.end_date < " + Me.Text0 + ";"

Set req = db.OpenRecordset(sql)

Me.Text6 = req.Fields("total").Value

End Sub

Mon problème est que la comparaison ne se fait pas car apparement il y a un probleme de format entre mes deux dates.

Quelqu'un saurait-il comment je peux faire pour résoudre ce problème ?
Merci
A voir également:

1 réponse

Salut,

première des choses en sql en vba, lorsque tu utilise des champs de date, tu dois mettre #madate#
sinon il voit pas.

Mais tu es sur la bonne voie coter sql.

si tu veux utiliser du vba, tu peux prendre la fonction DateDiff("tonformat", tapremiere, tadeuxiemedate)


merci
0