Discussion :

[Marius76]

Bonsoir,

J'ai une liste déroulante dans laquelle se situe une liste de dates.
Je dois en sélectionner une et la date s'affiche alors dans une zone de texte et les données relatives à cette date précise s'afficheront après dans un sous formulaire.
Si toutes les dates s'affichent bien dans la liste déroulante ( qui a pour source les dates de la table dates qui sont triées via une requete), seul les dates commencant par 01/01/xxxx s'affiche dans la case correspondante qui a poru source la table date aussi.
J ai bien pris soin de mettre le meme masque de saisie pourtant : 00/00/0000;0;_ et il ne me semble pas y avoir de probleme dans le code pour sélectionner :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub Modifiable1_AfterUpdate()
 
    Dim stDocName As String
    Dim stLinkCriteriA As String
    Dim Ladate As Date
 
    Ladate = Forms![F_Data]![Modifiable1]
 
    DoCmd.Echo False
 
    DoCmd.Close acForm, "F_Data"
    DoCmd.OpenForm "F_Data", acNormal, , "[DateCur] =#" & Ladate & "#"
 
    DoCmd.Echo True
 
 
 
End Sub

Merci d avance pour votre aide.

[Marius76]

En fait j ai compris qu Access inversait la date et le mois c est pour cela que les 01/01 marche ou 03/03/xxx etc.... J ai bien lu la FAQ mais vu que ma liste doit juste lire je ne comprends pas le masque de saisie à utiliser.

[Kloun]

Bonjour,

Essaie :

Code :

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

"[DateCur] =#" & format(Ladate, "MM/DD/YYYY") & "#"

[Marius76]

Yep !!! Merci Beaucoup...qu est ec que j ai galéré. C est bizarre cette histoire quand meme que ca soit aussi prise de tete. J'ai pu lire que ca posait souvent problème. Meme après coup j n ai pas compris pourquoi ou met MM DD et pas DD MM dans la formule mais en tout cas ca marche niquel.

Encore une fois merci