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

or

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

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

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

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

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


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

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

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

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

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


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

إذا كنت لا تريد إضافة مجموعات إلى البيانات ، يمكنك تجربة رمز 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 المفتاح ، ينبثق مربع حوار لتذكيرك بتحديد عمود المفتاح الذي يقوم بإدراج فاصل الصفحة بناءً على.
doc فاصل صفحة إدراج شرطي 5

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


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

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

كوتولس ل إكسيل, مع أكثر من 300 وظائف يدوية ، تجعل مهامك أكثر سهولة. 

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

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

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

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




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

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.