طباعة تقرير

هل جربت من

ملف ........ طباعة

سيظهر نطاق الطباعة

اختار الكل لكي تطبع جميع الصفحات او

الصفحات من ........ إلى .........

هذي اسهل طريقة هل تناسبك ؟؟؟؟

السلام عليكم

اسهل طريقة لاظهار مربع حوار الطباعة لتحديد صفحات الطابعة

اعلمي زي امر على النموذج وضعي به هذا الكود

DoCmd.OpenReport "ReoportName", acViewPreview

حيث ReoportName اسم التقرير الموجود لديك

ثم اذهبي الى التقرير وفي حدث عند التنشيط ضعي هذا الكود

On Error Resume Next

DoCmd.RunCommand acCmdPrint

DoCmd.Close acReport, Me.Name

وبعد ضغط الزر الموجود في النموذج سيظهر مربع حوار الطباعة ومنه تحدد عدد الصفحات من والى

Print.rar

شكرا لكم ولكن ظننت انه يوجد طريقة برمجية

وعلى كل حال يوجد سؤال اخر هو كيفية عدم طباعة صفحة من صفحات التقرير اذا كانت خالية من المعلومات

مثلا طالب لا توجد له درجات امتحانية فلا نريد طباعة صفحته مع باقي الطلاب هل توجد طريقة لتجاوز هذه الصفحات

وشكرا لسرعة الاستجابة؟

السلام عليكم ورحمة الله وبركاتة

اليكي كود عدم طباعة التقارير الفارغة .. افتحي التقرير في عرض التصميم ثم اختاري خصائص التقرير وضعي هذا الكود في حدث عدم البيانات on NoData

Private Sub Report_NoData(Cancel As Integer)

"عفوا.. التقرير لايوجد بة بيانات"msgbox

DoCmd.CancelEvent

End Sub

تمنياتي بالتوفيق

شِكرا جزيلا

ولكن المطلوب ليس عدم طباعة التقرير كله في حال عدم وجود بيانات بل عدم طباعة بعض الصفحات التي لا تحوي بيانات

فمثلا لو كان عندنا 100 طالب وقدم 80 منهم الامتحان فلا حاجة لطباعة جلاءات العشرون الباقية وبالتالي عندما يصل التقرير

الى هؤلاء العشرون فانه لا يقوم بطباعة هذه الصفحات؟