2saad قام بنشر يناير 26, 2023 قام بنشر يناير 26, 2023 إخواني أعضاء المنتدي الكرام بعد سلام الله عليكم ورحمة الله وبركاته هذا الكود نفذته كما هو لطباعة نطاق معين ( صفحة ) عدد النسخ 4 ولكن طبع نسخة واحدة فما الحل ؟ () Sub PrintOut Dim RNG As Range Set RNG = Range("J1:R49") RNG.PrintOut Copies:=4, collate:=True End Sub
أبومروان قام بنشر يناير 28, 2023 قام بنشر يناير 28, 2023 Application.PrintOut Copies:=4, Printer:="HP Printer", Collate:=True
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.