كيفية إدراج فواصل الصفحات الشرطية في إكسيل؟

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

استخدام دالة Subtotal لإدراج فواصل الصفحات

استخدام كود فبا لإدراج فواصل الصفحات

أدخل فاصل صفحة كل صف لإدراج فاصل صفحة في الصفوف n

استخدام دالة Subtotal لإدراج فواصل الصفحات

في Excel ، يمكن لوظيفة Subtotal إضافة فواصل صفحات بناءً على المجموعة.

1. حدد البيانات التي تريد إضافة فواصل الصفحات إليها ، انقر فوق البيانات > الإجمالي.

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

3. انقر OK. الآن تم تجميع البيانات وإضافة فواصل الصفحات.

استخدام كود فبا لإدراج فواصل الصفحات

إذا كنت لا تريد إضافة مجموعات إلى البيانات ، يمكنك تجربة رمز VBA للتعامل مع هذه المهمة.

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

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

فبا: إدراج فواصل الصفحات عند تغيير البيانات

Sub PageBreak()
'UpdatebyExtendOffice20181101
    Dim xSRg As Range
    Dim xRg As Range
    On Error Resume Next
    Set xSRg = Application.InputBox("Select key column:", "Kutools for Excel", xTxt, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
    For Each xRg In xSRg
        ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakNone
        If xRg.Value <> xRg.Offset(-1, 0).Value Then
            ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakManual
        End If
    Next xRg
Application.ScreenUpdating = True
End Sub

3. صحافة F5 المفتاح ، ينبثق مربع حوار لتذكيرك بتحديد عمود المفتاح الذي يقوم بإدراج فاصل الصفحة بناءً على.

4. انقر OK، الآن تم إدراج فواصل الصفحات.

أدخل فاصل صفحة كل صف لإدراج فاصل صفحة في الصفوف n

إذا كنت تريد إدراج فواصل الصفحات في فاصل زمني ثابت ، فيمكنك استخدام كوتولس ل إكسيلالصورة إدراج صفحة في كل صف فائدة للتعامل مع المشكلة بسرعة.

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

1. حدد البيانات وانقر فوق كوتولس بلس > الطباعة > إدراج فاصل صفحة في كل صف.

2. في ال إدراج فاصل صفحة في كل صف الحوار ، اكتب الفاصل الزمني كما تريد.

3. انقر OK > OK لإغلاق مربعات الحوار ، تم إدراج فواصل الصفحات في كل صفين.

  إدراج فاصل صفحة في كل صف Nth

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

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

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

اقرأ أكثر... تحميل مجاني ... شراء... 

---

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

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...