شكررررررررررراً

بسم الله الرحمن الرحيم

أولا اضغط مفتاحى alt+f11 لفتح محرر الاكواد
سم اضغط insert ثم new mudel

والصق هذا الكود واضغط حفظ لمحرر الاكواد

Sub print_1()
'
' print_1 ماكرو
'

'
Range("A1:L29").Select
Selection.PrintOut Copies:=1, Collate:=True
End Sub



تلاحظ فى هذا الكود أن نطاق الطباعة المحدد من الخلية a1 الى الخلية l29 يمكنك تغيير هذا النطاق الى النطاق الذى تريده

ثم اذهب الى صفحة الشهادات واعمل زر واضغط يمين على الزر واختر تحديد ماكرو وحدد الماكرو الذى تم لصقه واسمه print_1