Formun tasarımından kod bölümünü açınız oradaki yazılı kodu

Private Sub ARA_AfterUpdate()

    Dim rs As Object



    Set rs = Me.Recordset.Clone

    rs.FindFirst "[MKBZ  SERİ NO] = '" & Me![ARA] & "'"

    If Not rs.EOF Then Me.Bookmark = rs.Bookmark

End Sub

şeklinde değiştiriniz. Bu durumda istediğiniz gibi Makbuz Seri Numarasına göre istediğiniz kayıtlar forma getirilecektir. Rapor meselesine gelince, oluşturacağınız raporda sadece istediğiniz alanları yerleştirerek ölçüt olarak formda aktif olan verinin gelmesini sağlayabilirsiniz. Eğer anlatmak istediğiniz bu ise ve siz yapamazsanız lütfen bildirin düzenleyip ekleyelim. Kolay gelsin.