كيفية تعيين منطقة الطباعة على أوراق عمل متعددة في وقت واحد في Excel؟

بشكل عام ، يمكنك فقط تعيين منطقة الطباعة في ورقة عمل واحدة في كل مرة في Excel ، ولكن إذا كنت تريد تعيين نفس منطقة الطباعة في أوراق عمل متعددة في مصنف ، فهل هناك أي طرق سريعة لحلها؟ الآن ، سأخبرك ببعض التفاصيل حول الطرق السريعة لتعيين نفس منطقة الطباعة في أوراق عمل متعددة.

قم بتعيين نفس منطقة الطباعة على أوراق عمل متعددة باستخدام Kutools for Excel

قم بتعيين نفس منطقة الطباعة على أوراق عمل متعددة باستخدام VBA

---

قم بتعيين نفس منطقة الطباعة على أوراق عمل متعددة باستخدام Kutools for Excel

كوتولس ل إكسيل أناوهو مفيد في Excel الوظيفة الإضافية ، و نسخ إعداد الصفحة يمكن أن تساعدك الميزة في تعيين منطقة الطباعة بسرعة إلى أوراق عمل متعددة.

كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليه الآن

1. حدد منطقة الطباعة في إحدى ورقة العمل ، ثم انقر فوق "موافق" تخطيط الصفحة > منطقة الطباعة > تعيين ناحية الطباعة. انظر لقطة الشاشة:

2. انقر مشروع > أدوات الطباعة > نسخ إعداد الصفحة. انظر لقطة الشاشة:

3. في ال نسخ إعداد الصفحة مربع الحوار ، تحقق من أوراق العمل التي تريد تعيين منطقة الطباعة فيها ، ثم انقر فوق ورقة علامة التبويب والتحقق منطقة الطباعة فقط في اعداد الصفحة الجزء. انظر لقطة الشاشة:

4. ثم اضغط Ok لإغلاق مربع الحوار والنقر نعم في المستقبل كوتولس ل إكسيل مربع حوار تحذير ، ثم يتم تعيين أوراق العمل المحددة بنفس مناطق الطباعة مرة واحدة.

انقر هنا للحصول على مزيد من التفاصيل حول إعداد نسخ الصفحة.

---

قم بتعيين نفس منطقة الطباعة على أوراق عمل متعددة باستخدام VBA

إذا كنت مهتمًا بـ VBA ، يمكنك تجربة VBA التالية.

1. حدد النطاق الذي تريد تعيينه كمنطقة طباعة في إحدى أوراق العمل واضغط ALT + F11 مفاتيح لفتح مايكروسوفت فيجوال بيسك للتطبيقات نافذة.

2. انقر وحدة > إدراج لإدراج أ وحدة نافذة ، وانسخ VBA أدناه في النافذة.

فبا: تعيين منطقة الطباعة في المصنف بأكمله.

Sub SetGlobalPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWorkbook.Worksheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub

3. انقر يجري زر لتشغيل VBA ، وبعد ذلك سيتم تعيين جميع أوراق العمل في المصنف بنفس مناطق الطباعة.

تلميح:

إذا كنت تريد تعيين منطقة الطباعة في أوراق العمل المحددة ، فيمكنك القيام بما يلي:

1. حدد النطاق الذي تريد تعيينه كمنطقة طباعة ثم حدد أوراق العمل بالضغط CTRL المفاتيح التي تحتاجها ، ثم اضغط على ALT + F11 مفاتيح لفتح مايكروسوفت فيجوال بيسك للتطبيقات نافذة.

2. انقر وحدة > إدراج لإدراج نافذة الوحدة النمطية ، وانسخ VBA أدناه في النافذة.

فبا: تعيين منطقة الطباعة في أوراق العمل المحددة.

Sub SetSelectWsPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWindow.SelectedSheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub