مربع حوار الطابعة

الكثير منا عند ضغظ زر أمر طباعة فيؤدي ذلك إلى إلى طباعة التقرير تلقائيا حتى لو كان عدد الصفحات كثيرة . ولمن يرغب فى تحديد الصفحات قبل الطابعة يتبع ما يلي :

ضع الكود التالي على زر الطباعة فى النموذج :

DoCmd.OpenReport "ضع اسم التقرير هنا", acViewPreview

وضع الكود التالي قى حدث عند التنشيط للتقرير .

On Error Resume Next
DoCmd.RunCommand acCmdPrint
DoCmd.Close acReport, Me.name

المفروض لو الأمور ماشية بصورة صحيحة أنه عند الضغط على زر الطباعة يظهر لك الأول مربع الحوار للطابعة تحدد فيه الصفحات التي اريدها .

أشرف خليل