Dim rs As Object Set rs = Me.Recordset.Clone rs.FindFirst "sira = " & Me.Liste35 If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Private Sub listbox1_SelectedIndexChanged() Label10??? End Sub