إخوانى من فضلكم طلبى هو طباعة تقرير محدد من نموذج
لقد قمت ببناء نموذج وتقرير بناء على إستعلام من جدول وضعت فيه خانة طباعة على أن يتم عند إختيارها أن تتم طباعة البيانات المحددة
بحثت فى المنتدى وجدت الأخت زهرة عدلت على هذا الملف
حاولت أن أطبق ما فعلته وهو فى الإستعلام أضافة true فى معايير الطباعة
ولكن المشكلة عندى أن عندما نفذت هذا وأصبحت أختار البيانات المطلوبة وجدتها تختفى تماما من النموذج
كل ما أريده إخوانى إنى عندما أختار طباعة تتم طباعة المحدد فقط دون الغير قى التقرير
وشكرا لكم
هل من مجيب
خطوات الحل سريعا ...(وأي إستفسار تحت امرك ):
أولا : Query :
1- تم عمل استعلام (Query) أخر هو نفسه الإستعلام Q_required ولكن بإسم Q_required_print
2- وفي حقل (Field) ال print وفي خانة الشرط (criteria) تم اضافة كلمة on وذلك لإختيار الحقول (Fields) فقط التي تخترها للطابعة
ثانيا :الكود :
3- في الفورم Q_required اكتب الكود التالي في الحدث event في on click :
Dim strDocName As String DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 strDocName = "88" DoCmd.OpenReport strDocName, acViewPreview, "Q_required_print" Exit_Command70_Click: Exit Sub
أخى جزاك الله خير عن معلوماتك وفعلا هذا ما أريده شكرا
أخى جزاك الله خير عن معلوماتك وفعلا هذا ما أريده شكرا
شرح الحل :
ضع فقط هذا الكود في زر الطباعة بدل الكود الموجود في الملف المرفق في ردك الأول.......... وليس الملف المرفق في ردي أنا
Private Sub Ctl55_Click() DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 DoCmd.OpenReport "88", acViewPreview, , "print = on " End Sub
بدون عمل استعلام ولا شئ
ياأخى رائع بمعنى ماتحمله من كلمة رزقك الله رضاك إلى يوم الدين
وشكرا أخى أنك كنت بالمساعدة مرة أخرى
ولكن لى طلب بسيط وجدت فى خصائص التقرير عند عامل التصفية هذا (print = on )
فهل من الممكن أن تبين معنها
وجزاك الله عنا خير
هذا الموضوع مغلق.