Quand je choisis une valeur dans la liste déroulante, l'enregistrement dans le formulaire doit correspondre à la valeur sélectionnée dans cette liste. ça fonctionne très bien quand j'ai un champs texte mais pas pou rune date.
J'ai essayé pas mal de possibilité et rien ne va.
J'ai déjà regardé dans les tutoriels et je ne trouve de solution.
voici le code utilisé:
Code:
Private Sub liste_date_AfterUpdate()
' Rechercher l'enregistrement correspondant au contrôle.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[debabs] = " & Chr(35) & Format(Me![liste_date], "dd/mm/yyyy") & Chr(35)
Me.Bookmark = rs.Bookmark
End Sub
Partager