كيفية تعيين منطقة الطباعة لعدة أوراق عمل في نفس الوقت في Excel؟
بشكل عام، يمكنك فقط تعيين منطقة الطباعة في ورقة عمل واحدة في كل مرة في Excel، ولكن إذا كنت تريد تعيين نفس منطقة الطباعة في عدة أوراق عمل داخل مصنف، هل هناك طرق سريعة لحل هذه المشكلة؟ الآن، سأخبرك ببعض التفاصيل حول الطرق السريعة لتعيين نفس منطقة الطباعة في عدة أوراق عمل.
تعيين نفس منطقة الطباعة لعدة أوراق عمل باستخدام Kutools لـ Excel
تعيين نفس منطقة الطباعة لعدة أوراق عمل باستخدام VBA
تعيين نفس منطقة الطباعة لعدة أوراق عمل باستخدام Kutools لـ Excel
Kutools لـ Excel هو إضافة مفيدة لـ Excel، وميزته نسخ إعدادات الصفحة يمكن أن تساعدك في تعيين منطقة الطباعة بسرعة لعدة أوراق عمل.
Kutools لـ Excel يتضمن أكثر من 300 أداة مفيدة لـ Excel. جربها مجانًا بدون قيود لمدة 30 يومًا. احصل عليها الآن
1. حدد منطقة الطباعة في واحدة من الأوراق، ثم انقر فوق تخطيط الصفحة > منطقة الطباعة > تعيين منطقة الطباعة. انظر لقطة الشاشة:
2. انقر فوق Kutools Plus > طباعة > نسخ إعدادات الصفحة.
3. في مربع حوار نسخ إعدادات الصفحة، حدد الأوراق التي تريد تعيين منطقة الطباعة فيها في نفس الوقت، ثم انقر فوق تبويب الورقة، وحدد منطقة الطباعة فقط في قسم إعداد الصفحة. انظر لقطة الشاشة:
4. ثم انقر فوق موافق لإغلاق مربع الحوار، وانقر فوق نعم في مربع تحذير Kutools لـ Excel الذي سيظهر، وبعد ذلك سيتم تعيين نفس مناطق الطباعة للأوراق المحددة دفعة واحدة.
انقر هنا لمزيد من التفاصيل حول نسخ إعدادات الصفحة.
تعيين نفس منطقة الطباعة لعدة أوراق عمل باستخدام VBA
إذا كنت مهتمًا بـ VBA، يمكنك تجربة الكود التالي.
1. حدد النطاق الذي تريد تعيينه كمنطقة طباعة في واحدة من الأوراق واضغط على Alt + F11 لفتح نافذة Microsoft Visual Basic For Applications.
2. انقر فوق Module > إدراج لإدراج نافذة Module، وانسخ الكود البرمجي أدناه إلى النافذة.
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. انقر فوق زر تشغيل لتشغيل الكود البرمجي، وبعد ذلك سيتم تعيين جميع الأوراق في المصنف بنفس مناطق الطباعة.
نصيحة:
إذا كنت تريد تعيين منطقة الطباعة في الأوراق المحددة، يمكنك القيام بما يلي:
1. حدد النطاق الذي تريد تعيينه كمنطقة طباعة، ثم حدد الأوراق عن طريق الضغط على مفتاح Ctrl للأوراق التي تحتاجها، ثم اضغط على Alt + F11 لفتح نافذة Microsoft Visual Basic For Applications.
2. انقر فوق Module > إدراج لإدراج نافذة Module، وانسخ الكود البرمجي أدناه إلى النافذة.
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
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...
Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير
- تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
- افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!
جميع إضافات Kutools. مثبت واحد
حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.
- حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
- مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
- الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
- تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد