Note: The other languages of the website are Google-translated. Back to English
تسجيل الدخول  \/ 
x
or
x
سجلوا معنا  \/ 
x

or

كيفية استبعاد خلية أو منطقة معينة من الطباعة في Excel؟

أثناء طباعة ورقة عمل ، قد تحتاج إلى استثناء قيم خلايا أو منطقة معينة من الطباعة لغرض ما. ستوضح لك الأساليب الواردة في هذه المقالة كيفية استبعاد خلية أو منطقة معينة من الطباعة بالتفصيل.

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


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


كما هو موضح أدناه ، تحتاج إلى استبعاد الصفوف رقم 5 و 9 أثناء طباعة ورقة العمل. قبل الطباعة ، يمكنك تخصيص تنسيق خلية أو منطقة معينة لإخفاء محتوى الخلية لتحقيق ذلك. الرجاء القيام بما يلي.

1. حدد الخلية أو المنطقة التي ستستبعد من الطباعة (هنا أحدد نطاقات متعددة A6: C6 و A10: C10) ، ثم اضغط CTRL + 1 مفاتيح في نفس الوقت لفتح مربع الحوار تنسيق الخلايا.

2. في ال تنسيق الخلايا مربع الحوار، انقر فوق عرف في ال الأقسام مربع تحت عدد علامة التبويب ، ثم أدخل ثلاث فاصلة منقوطة ؛؛؛ في نوع التذكرة مربع ، وأخيراً انقر فوق OK زر. انظر لقطة الشاشة:

الآن يتم إخفاء جميع المحتويات في النطاقات المحددة على الفور كما هو موضح أدناه. يمكنك البدء في طباعة ورقة العمل الآن.

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


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

إلى جانب الطريقة المذكورة أعلاه ، يمكنك تطبيق رمز VBA التالي لإخفاء محتويات الخلايا أو المنطقة المحددة تلقائيًا أثناء طباعة ورقة العمل.

1. صحافة قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة ، انقر مرتين ThisWorkbook في ال قسم المشاريع ، ثم انسخ والصق رمز VBA أدناه في ملف ThisWorkbook (كود) نافذة.

كود فبا: استبعاد خلية أو منطقة معينة من الطباعة في إكسيل

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

ملاحظة: في الكود ، الورقة 1 هي اسم الورقة النشط الذي تحتاج إلى طباعته ، و A6: C6 ، A10: C10 هي النطاقات التي ستستبعدها من الطباعة. يرجى تغييرها بناءً على احتياجاتك.

3. صحافة قديم + Q مفاتيح في نفس الوقت لإغلاق نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

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


مقالات ذات صلة:


أفضل أدوات إنتاجية المكتب

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

  • إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
  • سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى...
  • دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات...
  • حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
  • نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
  • استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات...
  • سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
  • اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF...
  • أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2019 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.
علامة تبويب kte 201905

يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
أوفيسيتاب القاع
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.