بسم الله الرحمن الرحيم
أولا اضغط مفتاحى 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
__________________
|