كيفية طباعة جميع الأوراق باستثناء ورقة واحدة محددة في إكسيل؟

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

اطبع كل الأوراق باستثناء ورقة واحدة باستخدام VBA

اطبع صفحات معينة تحتاجها باستخدام كوتولس ل إكسيل

---

اطبع كل الأوراق باستثناء ورقة واحدة باستخدام VBA

فيما يلي رمز VBA يمكنه طباعة جميع الأوراق باستثناء ورقة واحدة محددة.

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

2. انقر إدراج > مجمع نموذجيهـ ، الصق الكود أدناه في البرنامج النصي للوحدة.

VBA: طباعة ورقة باستثناء واحدة

Sub printsheets()
'UpdatebyExtendoffice20161031
 Dim xWs As Worksheet
 Application.ScreenUpdating = False
 For Each xWs In ThisWorkbook.Worksheets
  If xWs.Visible = True Then
   If xWs.Name <> "Total" Then
       With xWs.PageSetup
        .PrintArea = "A1:B15" ' USE YOUR PRINTAREA
        .Zoom = False
        .FitToPagesTall = 1
        .FitToPagesWide = 1
       End With
       xWs.PrintOut
   End If
  End If
 Next xWs
 Application.ScreenUpdating = False
 MsgBox "Sheet “Total” has not been printed", vbInformation, "Kutools for Excel"
End Sub

ملاحظة: في الكود ، ملف المبلغ الإجمالي in إذا كان xWs.Name <> "إجمالي" ثم و MsgBox "لم تتم طباعة إجمالي الورقة" هو اسم الورقة الذي لا تريد طباعته ، و A1: B15 in .PrintArea = "A1: B15" هو النطاق الذي تريد طباعته لكل ورقة. يمكنك تغييرها كما تريد.

3. صحافة F5 مفتاح لتشغيل التعليمات البرمجية ، ثم ينبثق مربع حوار لتذكيرك بأن الورقة المحددة لم تتم طباعتها. انظر لقطة الشاشة:

4. انقر OK لإغلاق الحوار.

---

اطبع صفحات معينة تحتاجها باستخدام كوتولس ل إكسيل

إذا كنت تريد فقط طباعة الصفحات الزوجية أو الفردية فقط ، أو صفحات معينة من الورقة ، فيمكنك التقديم كوتولس ل إكسيلالصورة طباعة الصفحات المحددة الأداة التي يمكن أن تقدم لك معروفًا بسرعة.

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي :(قم بتنزيل Kutools for Excel الآن!)

1. قم بتنشيط الورقة التي تريد طباعة صفحات معينة فيها ، انقر فوق كوتولس بلس > الطباعة > طباعة الصفحات المحددة. انظر لقطة الشاشة:

2. ثم في طباعة الصفحات المحددة مربع الحوار ، تحقق من الخيارات بناءً على احتياجات الطباعة الخاصة بك. انظر لقطة الشاشة:

3. انقر طباعة لطباعة الصفحات.

تلميح. إذا كنت ترغب في الحصول على نسخة تجريبية مجانية من وظيفة طباعة الصفحات المحددة ، يرجى الانتقال إلى تنزيل Kutools for Excel مجانًا اولا ثم انتقل لتطبيق العملية حسب الخطوات اعلاه.