For x = 0 To Metin11.ListCount - 1
K_id = Metin11.Column(0, x) 'kişiyi belirten kimlik bilgisinin 1. Sütunda oldugu varsayilmistir
stDocName = "rpr_dallar"
DoCmd.OpenReport stDocName, acViewReport , , "K_id=" & K_id
DoCmd.Close acReport, stDocName
Next x
şeklinde dener mısınız?
Liste Kutusunun Tümünün Raporunu Almak
Konuyu Okuyanlar: 1 Ziyaretçi