Conversion de format de date

Bonjour,

J'aimerais imprimer un rapport en ne prenant en compte que les dates supérieures à une valeur rentrée dans la zone de texte "date_rapport_min".
La base à imprimer s'appelle "hotline" et possède un champ "date"

J'ai rentré le code suivant

Code:

---

1 2 3 4 5 6

Dim stDocName As String Dim Datation As Date Datation = "# Me.date_rapport_min #"   stDocName = "hotline" DoCmd.OpenReport stDocName, acViewPreview, , "date > Datation"

---

mais j'obtient l'erreur
"type mismatch". Comment faire?

Merci de votre aide

Il me semble que si tu mets

Code:

---

1 2	Datation = "# Me.date_rapport_min #"

---

il faut que la date soit au format US Soit Mois /Jour/Annee

mais ça doit marcher avec

Code:

---

1 2 3 4 5 6

Dim stDocName As String Dim Datation As Date Datation = Me.date_rapport_min.value   stDocName = "hotline" DoCmd.OpenReport stDocName, acViewPreview, , "date > " & Datation

---

Bonjour,

Tu dois écrire cela comme suit:

Code:

---

1 2 3 4 5

Dim strDatation As String   strDatation = "#" & Format(Me!date_rapport_min, "mm/dd/yyyy") & "#" DoCmd.OpenReport "hotline", acViewPreview, , "[date] > " & strDatation

---

Argy