كيف يمكنك استبعاد خلية أو نطاق معيّن من الطباعة في Excel؟
عند طباعة ورقة العمل، قد ترغب أحيانًا في استبعاد خلية أو منطقة معيّنة من الطباعة لأسبابٍ مختلفة. يعرض لك هذا المقال الطرق التفصيلية لاستبعاد خلية أو نطاق معين من الطباعة بسهولة وفعالية.
استبعاد خلية أو منطقة معينة من الطباعة بتخصيص تنسيق الخلية
استبعاد خلية أو منطقة معينة من الطباعة باستخدام كود VBA
استبعاد خلية أو منطقة معينة من الطباعة بتخصيص تنسيق الخلية
كما هو موضح في لقطة الشاشة أدناه، تحتاج إلى استبعاد الصفين 5 و9 عند طباعة ورقة العمل. ولتحقيق ذلك، يمكنك قبل الطباعة تخصيص تنسيق الخلية أو النطاق المطلوب لإخفاء محتواه. يُرجى اتباع الخطوات التالية.
1. حدد الخلية أو النطاق الذي تريد استبعاده من الطباعة (في هذا المثال، اخترت النطاقات المتعددة A6:C6 وA10:C10)، ثم اضغط في الوقت نفسه على مفاتيحCtrl+1لفتح مربع حوار «تنسيق الخلايا».
2. في مربع حوارتعيين تنسيق الخلية، انقر علىمخصصفي مربعالفئةأسفل تبويبالرقم، ثم أدخل ثلاث فواصل منقوطة;;; في مربعالنوع، وانقر أخيرًا على زرموافق. انظر لقطة الشاشة:
أصبحت الآن جميع محتويات النطاق المحدد مخفية فورًا، كما يظهر في لقطة الشاشة أدناه. يمكنك البدء في طباعة ورقة العمل الآن.
ملاحظة: بعد الطباعة، يمكنك إزالة الفواصل المنقوطة التي أدخلتها في الخطوة 2 من مربع حوار «تعيين تنسيق الخلية» لإعادة عرض محتويات الخلايا.
افتح سحر إكسل مع KUTOOLS AI
- التنفيذ الذكي: نفِّذ عمليات الخلايا، وحلِّل البيانات، وأنشئ المخططات البيانية — كل ذلك بأوامر بسيطة!
- الصيغ المخصصة: أنشئ صيغًا مخصصة لتبسيط سير عملك.
- برمجة VBA: اكتب وأَنفِذ أكواد VBA بسلاسة تامة.
- تفسير الصيغ: افهم الصيغ المعقدة بسهولة!
- ترجمة النصوص: اكسر الحواجز اللغوية في جداولك الإلكترونية!
استبعاد خلية أو منطقة معينة من الطباعة باستخدام كود VBA
بالإضافة إلى الطريقة السابقة، يمكنك استخدام كود VBA التالي لإخفاء محتويات خلية أو نطاق معيّن تلقائيًا عند طباعة ورقة العمل.
1. اضغط على مفاتيحAlt + F11 في الوقت نفسه لفتح نافذةمايكروسوفت Visual Basic for Applications.
2. في نافذةمايكروسوفت Visual Basic for Applications، انقر نقرًا مزدوجًا علىThisWorkbook في جزءالمشروع، ثم انسخ والصق كود VBA أدناه في نافذةThisWorkbook (الكود).
كود VBA: استبعاد خلية أو منطقة معينة من الطباعة في Excel
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim xIndex As Long
If ActiveSheet.Name = "Sheet1" Then
Cancel = True
Application.EnableEvents = False
Application.ScreenUpdating = False
With ActiveSheet
xIndex = .Range("A6:C6,A10:C10").Font.ColorIndex
.Range("A6:C6,A10:C10").Font.Color = vbWhite
.PrintOut
.Range("A6:C6,A10:C10").Font.ColorIndex = xIndex
End With
Application.EnableEvents = True
Application.ScreenUpdating = True
End If
MsgBox "Print completed！", vbInformation, "Kutools for Excel"
End Sub
ملاحظة: في الكود، يشير Sheet1 إلى اسم ورقة العمل الحالية التي تريد طباعتها، بينما يمثل النطاقان A6:C6 وA10:C10 المناطق التي سيتم استبعادها من الطباعة. يُرجى تعديلها وفقًا لاحتياجاتك.
3. اضغط على مفاتيحAlt + Q في الوقت نفسه لإغلاق نافذة مايكروسوفت Visual Basic for Applications.
الآن يمكنك البدء في طباعة ورقة العمل الخاصة بك. بعد الانتهاء من الطباعة، ستظهر لك نافذةKutools لـ Excelكما هو موضح في لقطة الشاشة أدناه، حيث يمكنك ملاحظة أن نطاقًا محددًا فارغ في النسخة المطبوعة.
مقالات ذات صلة:
- كيف يمكنك استبعاد القيم الموجودة في قائمة واحدة من قائمة أخرى في Excel؟
- كيف يمكنك استبعاد خلايا معيّنة في عمود من عملية الجمع في Excel؟
- كيف تبحث عن القيمة الدنيا في نطاق مع استبعاد القيم التي تساوي صفرًا في Excel؟
أفضل أدوات الإنتاجية لمكتبتك
عزِّز مهاراتك في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل