مساعدة في طباعة تقرير بعد الفرز

[ازهر عبد العزيز]

السلام عليكم 

لدي نموذج form3 يحتوي نموذج فرعي form1 احتاج طباعة البيانات في النموذج الفرعي بعد اي عملية الفرز في النموذج الفرعي  ....من خلال التقرير ur بمعنى عند القيام بعمية الفرز داخل النموذج الفرعي والضغط على زر الطباعة يفتح التقرير بحسب الفرز الذي تم في النموذج الفرعي

ur.accdb

[jjafferr]

وعليكم السلام 🙂

 

ضع هذا الكود على حدث "فتح التقرير"

Private Sub Report_Open(Cancel As Integer)
    
    Me.OrderBy = Forms!form3.form1.Form.OrderBy
    Me.OrderByOn = True
End Sub

 

جعفر

[ازهر عبد العزيز]

الاستاذ @jjafferrلم يفلح الكود فلم تظهر التصفية في التقرير

[أبوبسمله]

مشاركه مع معلمنا العزيز جعفر جزاه الله عنا كل خير

قمت بادراج استعلام واصبح النموذج والتقرير يتم تصفيتهم بناء عالكمبوبوكس

ur(1).accdb

[ازهر عبد العزيز]

اخي @احمد الفلاحجي شكرا على مرورك لكن ليس المطلوب التغيرات التي قمت بعملها كثيرة على القاعدة لكن شكرا على مجهودك 

[أبوبسمله]

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله عنا كل خير

ولا يهمك بالتوفيق

[أبوبسمله]

اتفضل

تحت زر التقرير

Private Sub أمر1_Click()
    DoCmd.OpenReport "ur", acViewReport, , Forms!form3!form1.Form.Filter
End Sub

بالتوفيق

ur.accdb

[jjafferr]

🙂

انت قلت :

منذ ساعه, ازهر عبد العزيز said:

بعد اي عملية الفرز في النموذج الفرعي

والآن تقول :

3 دقائق مضت, ازهر عبد العزيز said:

لم يفلح الكود فلم تظهر التصفية في التقرير

 

جعفر

[أبوبسمله]

صحيح ما ذكرت معلمنا العزيز @jjafferr انه ذكر بعد الفرز

ولكن النموذج والتقرير تم انشائهما عالجدول مباشرة وهو يريد فتح التقرير بعد التصفيه عالسجلات المصفاه فالامر تصفيه وليس فرز

تحياتى معلمنا الغالى 💐