كيف يمكن إدراج فاصل صفحات تلقائيًا عند تغيُّر القيمة في Excel؟
افترض أن لديك قائمة بيانات في ورقة عمل، وتحتاج إلى إدراج فاصل صفحات كلما تغيّرت القيمة في العمود A، كما يظهر في لقطة الشاشة على اليسار. قد يكون إدراج فواصل الصفحات يدويًّا واحدًا تلو الآخر أمرًا مرهقًا ويستغرق وقتًا طويلاً، خاصةً عند التعامل مع مجموعات بيانات كبيرة. لحسن الحظ، توجد عدة طرق عملية وفعّالة لإدراج فواصل الصفحات تلقائيًّا استنادًا إلى تغيّر القيم. سيستعرض هذا المقال حلولًا متعددة بالتفصيل، تشمل السيناريوهات التي تعتمد على VBA أو الإضافات، وأخرى لا تتطلبها، لمساعدتك على اختيار الطريقة الأنسب لمهمتك.
إدراج فاصل الصفحات عند تغيّر القيمة باستخدام كود VBA
إذا كنت بحاجة إلى إدراج فاصل صفحات تلقائيًا كلما تغيّرت القيمة في عمود معيّن، فإن استخدام VBA يُعدّ وسيلة فعّالة لتحقيق ذلك. هذه الطريقة مثالية للمستخدمين المتمرسين في التعامل مع ماكرو Excel والراغبين في اعتماد حل آلي.
1. اضغط باستمرار على مفاتيحALT + F11 لفتح نافذةمايكروسوفت فيجوال بيسيك للتطبيقات.
2. انقرإدراج > وحدة نمطية، ثم الصق الكود التالي في نافذةالوحدة النمطية.
كود VBA: إدراج فاصل الصفحات عند تغيّر القيمة:
Sub insertpagebreaks()
'updateby Extendoffice
Dim I As Long, J As Long
J = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
For I = J To 2 Step -1
If Range("A" & I).Value <> Range("A" & I - 1).Value Then
ActiveSheet.HPageBreaks.Add Before:=Range("A" & I)
End If
Next I
End Sub
3. اضغط على مفتاحF5 لتشغيل هذا الكود. سيقوم Excel تلقائيًا بإضافة فاصل صفحات عند كل نقطة تتغيّر فيها البيانات في العمود A. انظر لقطة الشاشة أدناه:
يُعدّ نهج VBA هذا حلًّا مرنًا للغاية، وهو مثالي لمجموعات البيانات الكبيرة أو المهام المتكررة. ومع ذلك، إذا لم تكن معتادًا على VBA أو كانت بيئة عملك تمنع استخدام الماكرو، فننصحك بالنظر في الطرق البديلة التالية.
إدراج فاصل الصفحات عند تغيّر القيمة باستخدام ميزة قوية
معKutools لـ Excel، يمكنك إضافة فاصل صفحات بسرعة في كل مرة تتغيّر فيها القيم في عمود معيّن، بالإضافة إلى تطبيق إجراءات تنسيق أخرى مثل إدراج صفوف فارغة، أو إضافة خطوط حدود، أو تعبئة لون الخلفية عند تغيّر القيمة. هذه الميزة مثالية خصوصًا إذا كنت بحاجة متكررة إلى هذا النوع من تنسيق البيانات، ولا تتطلب كتابة أي أكواد أو فهمها.انقر لتنزيل Kutools لـ Excel.
1. في ورقة العمل الخاصة بك، انتقل إلى علامة التبويبKutools، ثم انقرتنسيق > تمييز التغييرات في العمود. راجع لقطة الشاشة:
2. في مربع الحوارتمييز التغييرات في العمود:
- حدد نطاق البيانات الذي ترغب في العمل عليه، واختر العمود الرئيسي (وهو عادةً العمود الذي تريد اكتشاف التغيّرات في قيمه).
- اخترفاصل الصفحاتضمنخيارات.
3. انقر على زرموافق. سيقوم Kutools تلقائيًا بإضافة فاصل صفحات عند كل نقطة تتغيّر فيها قيمة العمود المحدد. وتُظهر لقطة الشاشة أدناه النتيجة:
Kutools لـ Excel- عزِّز Excel بقوة أكثر من 300 أداة أساسية، لتجعل عملك أسرع وأسهل، واستفد من ميزات الذكاء الاصطناعي لمعالجة البيانات بشكل أكثر ذكاءً وزيادة الإنتاجية.احصل عليه الآن
هذه الطريقة سهلة الاستخدام بشكل خاص، ومثالية لأولئك الذين يفضلون تجنب كتابة الرموز أو إدارة الماكرو. كما أنها مفيدة أيضًا لتلبية مجموعة واسعة من احتياجات التنسيق المشابهة التي تمتد إلى ما هو أبعد من فاصل الصفحات.
تحديد مواضع الفواصل باستخدام عمود مساعد الصيغة
يمكنك استخدام صيغة Excel لتحديد متى تتغيّر القيمة في عمود، مما يساعدك على معرفة المكان الأنسب لإدراج فاصل صفحة يدوي. وعلى الرغم من أن الصيغ القياسية لا تُدرج فواصل الصفحات مباشرةً، فإنها تُسهّل اكتشاف المواضع التي تحتاج إلى فواصل. وتُعد هذه الطريقة مثالية خصوصًا إذا كنت تفضّل تجنّب استخدام ماكرو أو إضافات، وكانت مجموعة بياناتك صغيرة إلى متوسطة الحجم.
سيناريوهات التطبيق:استخدم هذا النهج إذا كنت تبحث عن دليل بصري لإدراج فاصل صفحات دون أي أتمتة، أو عند العمل في بيئات لا يُسمح فيها باستخدام الماكرو أو الإضافات.
على سبيل المثال، افترض أن بياناتك تقع في العمود A بدءًا من الصف 2. لتحديد مواضع تغيُّر القيم:
1. أدخل الصيغة التالية في الخلية B2:
=A2<>A1تقارن هذه الصيغة كل خلية في العمود A بالخلية الموجودة فوقها، وستعرضTRUE عندما تكون القيمة في A2 مختلفة عن A1، مما يشير إلى وجود تغيير.
2. انسخ الصيغة لأسفل لتطبيقها على الصفوف الأخرى.
الآن، يُظهر كلTRUE في العمود B الموضع الذي تتغيّر فيه القيمة في العمود A. يمكنك إضافة فاصل صفحات يدويًا مباشرةً قبل أو بعد كل صف يُشار فيه إلى وجود تغيير.
بدلاً من ذلك، يمكنك استخدام صيغةIF لجعل المؤشر أكثر وضوحًا. أدخل ما يلي في الخلية B2:
=IF(A2<>A1, "Insert Break", "")سيؤدي ذلك إلى عرض «إدراج فاصل» عند تغيُّر القيمة، مما يسهّل الفحص البصري.
- تلميح:بعد وضع العلامات، اطلع على ورقتك وأدرج فاصل الصفحات في كل موضع معلَّم حسب الحاجة ()تخطيط الصفحة > فواصل > إدراج فاصل الصفحات).
المزايا:لا حاجة إلى رموز أو إضافات، ويسهل تطبيقه على مجموعات البيانات الصغيرة أو المتوسطة.
العيوب:يتطلب إدراج فاصل الصفحات يدويًّا، وقد يصبح الأمر مملًّا في القوائم الكبيرة جدًّا.
مقالات ذات صلة إضافية:
- نطاق الصف المميز عند تغيّر قيمة الخلية في Excel
- إذا كانت لديك قائمة تحتوي على قيم متكررة في ورقة العمل، وتحتاج إلى تمييز الصفوف بناءً على تغيّر قيمة الخلية في العمود A كما في لقطة الشاشة التالية، فيمكنك إنجاز هذه المهمة بسرعة وسهولة باستخدام ميزة «التنسيق الشرطي».
- زيادة الأرقام عند تغيّر القيمة في عمود آخر
- افترض أن لديك قائمة قيم في العمود A، وترغب في جعل الأرقام في العمود B تزيد بمقدار 1 كلما تغيّرت القيمة في العمود A — أي أن العد يستمر حتى يحدث تغيير في العمود A، ثم يُعاد تعيينه ليبدأ من 1 مجددًا، كما هو موضح في لقطة الشاشة على اليسار. في Excel، يمكنك حل هذه المشكلة بالطريقة التالية.
- جمع الخلايا عند تغيّر القيمة في عمود آخر
- عند العمل على ورقة عمل Excel، قد تحتاج أحيانًا إلى جمع القيم في خلايا عمودٍ ما استنادًا إلى التغيّرات في بيانات عمودٍ آخر. على سبيل المثال، هنا أرغب في جمع الطلبات الواردة في العمود B كلما تغيّرت القيمة في العمود A، للحصول على النتيجة التالية. كيف يمكنك تحقيق ذلك في Excel؟
- إدراج صفوف فارغة عند تغيّر القيمة في Excel
- افترض أن لديك نطاق بيانات، وترغب الآن في إدراج صفوف فارغة بين البيانات كلما تغيّرت القيمة، لفصل القيم المتسلسلة المتماثلة في عمود واحد كما في لقطات الشاشة التالية. في هذا المقال، سأعرض لك بعض الحيل الذكية لحل هذه المشكلة بسهولة.
- تشغيل ماكرو عند تغيّر قيمة الخلية في Excel
- عادةً في Excel، يمكنك الضغط على مفتاح F5 أو زر التشغيل لتنفيذ كود VBA. لكن هل سبق أن حاولت تشغيل ماكرو معيّن تلقائيًا عند تغيّر قيمة خلية؟ في هذا المقال، سأقدّم لك بعض الحيل السريعة للتعامل مع هذه المهمة في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل