Discussion :

[noakiss]

Bonjour,
J'ai un petit souci avec une variable Date,
Voici comme je la déclare :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim Date_Debut As Date
Dim Date_Fin As Date
Dim Annee As Integer
 
Annee = Year(Date)
Annee = Annee - 1
 
Date_Debut = "01/01/" & Annee
Date_Fin = "31/12/" & Annee

Lorsque je fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
    MsgBox "Date : " & Date_Debut
      MsgBox "Date : " & Date_Fin

La bonne date est affichée seulement quand je l'utilise dans une requète, on dirait que la variable est vide.
Voici comment je l'utilise :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

req = "SELECT ......FROM .......WHERE ...... AND FORMATION.DateDebut>= " & Date_Debut & " AND FORMATION.DateDebut<= " & Date_Fin & " ......"

Comment cela est iol possible sachant que j'ai fait exactement le même procédé dans une condition If du VBA?

[Jean-Philippe André]

bonjour
le format de la date dans une requete SQL doit être du type #MM/DD/YYYY#

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

req = "SELECT ......FROM .......WHERE ...... AND FORMATION.DateDebut BETWEEN #" & Format(Date_Debut,"MM/dd/yyyy") & "# AND #" & Format(Date_Fin,"MM/dd/yyyy") & "# ......"

[LE VIEUX]

a quel moment lances tu ta requête et comment - si c'est dans la même procédure tu dois récupérer normalement tes variables - si c'est a part.... tes variables sont vides.

[noakiss]

Ah ok, je viens de tester et en effet ça marche . Merci bien!