1 - açılır kutunun veri kaynağına aşağıdaki kodu ekleyin

SELECT Tablo1.Kimlik, Tablo1.ad

FROM Tablo1;

2 -  açılır kutunun :sütun sayısı--> 2  yapın
3 -  açılır kutunun :sütun genişliğini--> 0 yapın
4 - açılır kutunun : değiştiğinde olayına aşağıdaki kodu ekleyin

    Me.Recordset.FindFirst "[Kimlik]=" & Me.Metin28

______o0o_______
rapora gönder butonun koduna da aşağıdaki kodu ekleyin
ben sadece ikisi için yaptım diğer diğer formları da siz ekleyebilirsiniz

    DoCmd.OpenReport "rpr_son1", acViewNormal, , "[Kimlik]=" & Me.mtnkimlik, acHidden

    DoCmd.Close acReport, "rpr_son1"



    DoCmd.OpenReport "rpr_son2", acViewNormal, , "[Kimlik]=" & Me.mtnkimlik, acHidden

    DoCmd.Close acReport, "rpr_son2"