مساعدة في كود الطباعة

[حراثي تواتي]

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

خبراء منتدانا الغالي ارجوا منكم مساعدتي في هذا الكود كما هو موضع الشرح في الصور

ولكم منا فائق عبارات الشكر والتقدير

تواتي 12.xlsm

[الرائد77]

تفضل

Private Sub CommandButton2_Click()
ActiveSheet.PrintOut From:=Range("B8"), To:=Range("C8"), Copies:=1, Collate:=True
End Sub

• تواتي 12.xlsm

[حراثي تواتي]

بارك الله فيك أخي الرائد77

أثقل الله بها ميزان حسناتك