كيف يمكن إدراج فاصل صفحات في Excel بناءً على شرط معيّن؟
عند العمل مع مجموعات بيانات كبيرة في Excel، قد تحتاج أحيانًا إلى تنظيم التقارير المطبوعة بحيث تبدأ صفحة جديدة كلما تغيّرت القيمة في عمود معيّن. على سبيل المثال، تخيل أن لديك قائمة تحتويالعمود Aعلى فئات — فقد ترغب في بدء كل فئة في صفحة مطبوعة جديدة، كما هو موضح في لقطة الشاشة أدناه. وعلى الرغم من أن Excel يتيح لك إدراج فاصل صفحات يدويًّا، فإن القيام بذلك مع مجموعة بيانات كبيرة أو يتم تحديثها باستمرار قد يكون مملًّا وعرضة للخطأ. لحسن الحظ، هناك عدة طرق فعّالة لأتمتة هذه العملية، مما يوفّر الوقت ويقلّل الأخطاء.
استخدام دالة المجموع الفرعي لإدراج فاصل الصفحات
استخدام كود VBA لإدراج فاصل الصفحات
تمييز التغييرات في العمود لإدراج فاصل الصفحات عند تغيّر البيانات
إدراج فواصل الصفحات في كل صف آخر لإدراج فاصل الصفحات في الصفوف ذات الرقم n
حل بديل باستخدام الصيغ لإدراج فاصل الصفحات بشكل شرطي
استخدام دالة المجموع الفرعي لإدراج فاصل الصفحات
تُعد دالة المجموع الفرعي في Excel أداةً شائعة لتلخيص البيانات المجمَّعة، كما تتيح إدراج فاصل صفحات تلقائيًّا كلما تغيّرت القيمة في عمود معيَّن. وهي مثالية عندما تكون بياناتك مرتبة مسبقًا حسب العمود الذي تريد التجميع بناءً عليه—مثل اسم العميل أو رموز المنطقة—حيث تضيف فواصل الصفحات بين المجموعات بكفاءة، مما يبسّط إعداد التقارير والطباعة بشكل كبير.
قبل البدء، تأكد من فرز بياناتك بشكل صحيح حسب العمود المستهدف، إذ تُطبِّق دالة المجموع الفرعي فاصل صفحات عند كل تغيُّر في المجموعة، وقد يؤدي أي عدم تطابق إلى ظهور فواصل غير متوقعة.
1. حدد نطاق البيانات الذي تريد إدراج فاصل الصفحات فيه. انتقل إلى علامة التبويبالبيانات، ثم انقر علىالمجموع الفرعي.
2. في مربع حوارالمجموع الفرعي، اختر العمود المستهدف من قائمة «عند كل تغيّر في» (على سبيل المثال، العمود A إذا كان يحتوي على الحقل الرئيسي)، ثم حدد دالة تلخيص مناسبة (مثل)المجموعأوالعدد، إلخ)، وتأكد من تفعيل خيارفاصل الصفحات بين المجموعات. كما يمكنك تحديد أو إلغاء تحديد الخيارات الأخرى حسب احتياجاتك.
3. انقر علىموافقلتطبيق المجاميع الفرعية وإدراج فاصل الصفحات. بعد ذلك، ستظهر بياناتك مجمَّعة مع إدراج فاصل الصفحات تلقائيًّا عند كل تغيُّر في العمود المحدد.
نصائح عملية:
- استخدم هذه الطريقة عندما تريد طباعة ملخصات المجموعات بشكل منفصل أو عند حاجتك إلى طباعة تعتمد على المجموعات.
- يُعد هذا الخيار الأنسب للبيانات التي تم فرزها مسبقًا حسب العمود المستهدف؛ وإلا فقد تظهر فواصل غير صحيحة.
- إذا احتجت لاحقًا إلى إزالة التجميعات والفواصل المُدرجة، فانتقل ببساطة إلى علامة التبويبالبيانات، واخترالمجموع الفرعيمرة أخرى، ثم انقر علىإزالة الكل.
- إذا لم تظهر فواصل الصفحات في الموضع المتوقع، فتأكد من أن بياناتك مرتبة بشكل صحيح.
- يضيف المجموع الفرعي صفوف ملخّص؛ لذا إذا كنت ترغب في تجنّب ذلك، ففكّر في استخدام طريقة VBA أدناه.
استخدام كود VBA لإدراج فاصل الصفحات
إذا كنت ترغب في إدراج فاصل صفحات استنادًا إلى تغيُّر قيمة عمود، دون الحاجة إلى تجميع البيانات أو إضافة أعمدة ملخّص المجموع الفرعي، فإن استخدام VBA يُعد خيارًا عمليًّا. إذ يوفّر لك VBA مرونةً كبيرةً في تطبيق الشروط المخصصة، ويؤدي أداءً ممتازًا حتى مع البيانات غير المرتبة.
قبل تشغيل كود VBA، احفظ مصنفك لتجنب فقدان البيانات العرضي، وتأكد من تفعيل الماكرو في إعدادات تطبيق Excel.
1. اضغط علىAlt + F11 لفتح نافذة محررمايكروسوفت فيجوال بيسك للتطبيقات.
2. في محرر VBA، انقر علىإدراج > وحدة نمطيةلإضافة وحدة جديدة، ثم انسخ والصق الكود التالي في نافذة الوحدة.
VBA: إدراج فاصل الصفحات عند تغيّر البيانات
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. انقر علىموافق. سيقوم الكود تلقائيًّا بإدراج فاصل الصفحات في المواضع الصحيحة وفقًا للتغيّرات في العمود المختار.
نصائح عملية:
- مثالي للمستخدمين المتقدمين ذوي المتطلبات المخصصة لفاصل الصفحات.
- لا تغيّر هذه الطريقة هيكل بياناتك، وتجنب إضافة صفوف المجموع الفرعي.
- إذا ظهر لك تنبيه «ماكرو معطّل»، ففعّل الماكرو بالانتقال إلى ملف > خيارات > مركز الثقة.
- إذا لم يُدرج فاصل الصفحات، فتأكد من اختيارك للعمود الرئيسي الصحيح، وتحقق من وجود خلية مدمجة، إذ قد يتخطاها VBA.
- تذكّر حفظ مصنفك قبل تشغيل الكود، لأن إجراءات VBA لا يمكن التراجع عنها.
تمييز التغييرات في العمود لإدراج فاصل الصفحات عند تغيّر البيانات
بالنسبة للمستخدمين الذين يفضلون واجهة رسومية وخيارًا أكثر تقدمًا، تتيح ميزةKutools لـ Excelالمتمثلة فيتمييز التغييرات في العمودإدراج فواصل صفحات أو صفوف فارغة أو حدود أو تمييز بالألوان تلقائيًّا استنادًا إلى التغيّرات في قيم الأعمدة المحددة. ويُعد هذا النهج مثاليًّا خصوصًا للتقارير المنظمة أو الفواتير أو النماذج التي يلعب فيها الفصل البصري دورًا محوريًّا.
بعد تثبيتKutools لـ Excel، يُرجى اتباع الخطوات التالية:(تنزيل مجاني لـ Kutools لـ Excel الآن!)
انقر علىKutools > تنسيق > تمييز التغييرات في العمود.
2. في مربع حوارتمييز التغييرات في العمود، قم بتكوين الإعدادات كما يلي:
1) انقر على أيقونة التحديد
في قسمالنطاق، وحدد نطاق بياناتك باستثناء صفوف العناوين.
2) انقر على أيقونة التحديد
في قسمالعمود الرئيسي، واختر العمود الذي تريد أن يستند إليه فاصل الصفحات (باستثناء العناوين).
3) حددفاصل الصفحاتمن منطقةالخيارات. كما تتوفر خيارات إضافية، مثل إدراج صفوف فارغة أو تغيير لون الخلفية، لمزيد من التخصيص.
3. انقر علىموافق.
سيتم الآن إدراج فاصل صفحات تلقائيًّا عند كل تغيُّر في العمود المحدد ضمن نطاق التحديد.
المزايا:
- واجهة رسومية سهلة الاستخدام — لا حاجة إلى صيغ أو أكواد!
- يوفر خيارات تنسيق مرنة تتجاوز فاصل الصفحات وحسب.
- مثالي خصوصًا للتقارير التي تحتاج إلى فصل بصري واضح عند تغيّر البيانات.
- إذا كان مصنفُك يحتوي على أوراق محميّة، فقد تحتاج إلى إلغاء حمايتها قبل تطبيق هذه الميزة.
إدراج فواصل الصفحات في كل صف آخر لإدراج فاصل الصفحات في الصفوف ذات الرقم n
في بعض السيناريوهات، قد ترغب في إدراج فاصل صفحات بفترات منتظمة — على سبيل المثال، بعد كل صفّين أو خمسة صفوف — بغض النظر عن القيمة الفعلية في مجموعة البيانات الخاصة بك. ويُعدّ هذا مفيدًا بشكل خاص عند إعداد النماذج أو قوائم التذاكر أو القسائم التي يجب طباعتها في دفعات متساوية. يمكن لميزةKutools لـ Excel: إدراج فواصل الصفحات في كل صف آخرأن تنجز ذلك بسرعة دون الحاجة إلى الإدراج اليدوي لكل قسم.
بعد تثبيتKutools لـ Excel، يُرجى اتباع الخطوات التالية:(تنزيل مجاني لـ Kutools لـ Excel الآن!)
1. حدد البيانات التي ترغب في تطبيق فواصل الطباعة عليها، ثم انقرKUTOOLS PLUS > طباعة > إدراج فواصل الصفحات في كل صف آخر.
2. في مربع حوارإدراج فواصل الصفحات في كل صف آخر، حدد الفاصل الزمني (على سبيل المثال، أدخل "2" لإدراج فاصل صفحات كل صفَّين).
3. انقرموافق(و)موافقمرة أخرى إذا طُلب منك ذلك)، وسيتم إدراج فاصل الصفحات عند الفاصل الذي حددته.
السيناريوهات القابلة للتطبيق:
- مثالي للتطبيقات التي تتطلب فاصل صفحات عند فترات ثابتة، مثل الطباعة الجماعية أو النماذج المتكررة.
- سريع وسهل لأي إعداد بفاصل ثابت، ولا يتأثر بتغيّر البيانات.
- أقل مرونة إذا كنت بحاجة إلى فواصل مبنية على قيم محددة — استخدم الطرق الأخرى المذكورة أعلاه للفواصل الشرطية.
إدراج فاصل الصفحات كل N صفوف
حل بديل بالصيغة الشرطية لـ فاصل الصفحات
رغم عدم وجود صيغة مباشرة في Excel لإدراج فاصل الصفحات فعليًا، يمكنك استخدام الصيغ لاكتشاف مواضع التغيير في عمود ما، ثم استخدام هذه المعلومات للإشارة إلى الأماكن التي يجب أن تُضاف فيها فاصل الصفحات يدويًا أو تمييزها بصريًا. يُعد هذا النهج عمليًا للفصل البصري فقط أو عند تمرير منطق الطباعة إلى عملية أخرى.
1. في عمود مساعد (مثلًا، العمود B بدءًا من الخلية B2)، أدخل الصيغة التالية لتمييز كل تغيير في العمود A:
=IF(A2<>A1,"Page Break","") 2. اضغط Enter، ثم اسحب الصيغة لأسفل لتطبيقها على الصفوف الأخرى في العمود المساعد. حيث يظهر «فاصل الصفحات»، فهذا هو الموضع الذي يمكنك فيه إدراج فاصل الصفحات يدويًا فعليًّا (انتقل إلى)تخطيط الصفحة > فواصل > إدراج فاصل الصفحاتحسب الحاجة).
نصائح:
- يمكنك تصفية عمود المساعد أو تطبيق التنسيق الشرطي عليه لتمييز المواقع التي يجب وضع فواصل الصفحات فيها أو للعثور عليها بسهولة.
- هذه الطريقة مثالية للمراجعة البصرية أو لإدارة فواصل الصفحات شبه الآلية.
بغض النظر عن الطريقة التي تختارها، تأكد دائمًا من مراجعة ورقة العمل الخاصة بك في وضعفاصل الصفحات معاينة (عرض > علامة التبويبفاصل الصفحات معاينة) للتحقق من صحة فواصل الصفحات قبل الطباعة. إذا لاحظت وجود فواصل زائدة أو ناقصة، راجع ترتيب بياناتك وإعدادات الفواصل. ولا تتردد في تجربة أساليب مختلفة بما يتناسب مع سير عملك ومتطلبات تقاريرك.
إذا واجهت أخطاءً—مثل عدم ظهور خيارات إضافية لـ Kutools أو فشل الكود في التشغيل—فتأكد من إعدادات الوظائف الإضافية والماكرو في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل