Discussion :

[krassi]

je recupére 2 variables date debut et date fin et souhaite ouvrir un formulaire avec une date comprise entre ces variables; le formuliare s'ouvre mais ne fait pas le tri ou est le problème?

Code :

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

1
2
3
4
5
6
7
8
 
 
Private Sub Bascule8_Click()
 
date1 = datedeb.Value
date2 = dateFin.Value
DoCmd.OpenForm "tally1", , , date2 > "dateDebut" > date1, acFormReadOnly
End Sub

Merci

[Invité]

Bonjour

Qui dit date dit #,

Est ce que tes variables Date1 et Date2 sont au format date ?
et dateDebut ?

Starec

[krassi]

Date1, Date2 et dateDebut toutes au format date
Krassi

[cafeine]

Hello,

la notation bidule < "toto" < machin n'a rien d'académique ...

borner deux dates, c'est un tout petit plus structuré.

Code :

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

1
2
3
Dim strCrit As String
strCrit = "[champDate] BETWEEN #" & format(Dat1, "mm/dd/yy") & "# And #" & format(Dat2, "mm/dd/yy") & "#"
DoCmd.OpenForm "tally1", , , strCrit, acFormReadOnly

[krassi]

Cafeïne

Merci pour la réponse rapide; même si ca me semble tout de même un peu plus compliqué que ma formule bestiale, ça marche


Krassi