فرز Excel: فرز البيانات حسب النص أو التاريخ أو الرقم أو اللون
يُعد فرز البيانات في Excel مهمة شائعة وبسيطة تساعدك على إعادة ترتيب بياناتك حسب نوع الفرز الذي تختاره. عادةً، باستخدام ميزة الفرز المدمجة، يمكنك فرز الأرقام أو السلاسل النصية أو التواريخ والأوقات في عمود واحد أو أكثر؛ كما يمكنك أيضًا فرز البيانات حسب قائمة مخصصة أنشأتها، أو حسب تنسيق الخلية (مثل لون الخط أو لون الخلفية أو الأيقونة) بسرعة وسهولة.
بالإضافة إلى هذه الطرق البسيطة، هناك العديد من طرق الفرز المفيدة والمعقدة التي قد تحتاجها في عملك اليومي. سيقدم هذا الدليل أنواعًا مختلفة من الفرز لحل مشاكلك في Excel.
جدول المحتويات:
1. الوصول إلى خيارات الفرز في Excel
- 1.1 أزرار الفرز في الشريط
- 1.2 مربع حوار الفرز
- 1.3 خيارات الفرز في قائمة التصفية
- 1.4 خيارات الفرز بزر الفأرة الأيمن
- 2.1 فرز البيانات حسب النصوص أو الأرقام أو التواريخ
- 2.2 فرز البيانات حسب لون الخلية أو لون الخط أو أيقونة الخلية
- 2.3 فرز البيانات حسب أعمدة متعددة
- 2.4 فرز البيانات بناءً على قائمة مخصصة
- 2.5 فرز البيانات من اليسار إلى اليمين (فرز أفقي)
- 2.6 فرز البيانات مع مراعاة حالة الأحرف
4. فرز البيانات تلقائيًا عند إدخال أو تغيير البيانات
- 4.1 فرز القيم الرقمية تلقائيًا في عمود باستخدام الصيغ
- 4.2 فرز القيم النصية تلقائيًا في عمود باستخدام الصيغ
- 4.3 فرز المزيج من القيم الرقمية والنصية تلقائيًا في عمود باستخدام كود VBA
الوصول إلى خيارات الفرز في Excel
يوفر Excel عدة طرق للوصول إلى ميزة الفرز وخياراتها.
1.1 أزرار الفرز في الشريط
أسرع طريقة لتطبيق ميزة الفرز هي استخدام أزرار الفرز في الشريط.
انقر على أي خلية في عمود يحتوي على قيم تريد فرزها، ثم انتقل إلى علامة التبويب البيانات، وفي قسم Sort & Filter، انقر على زر Sort A to Z أو Sort Z to A لفرز البيانات تصاعديًا أو تنازليًا أبجديًا. انظر الصورة:
ملاحظة: إذا كانت هناك صفوف فارغة في نطاق البيانات، بعد تطبيق هذه الأزرار، سيتم فرز نطاق البيانات للخلية المحددة فقط التي تقع فوق أو تحت الصفوف الفارغة بنجاح.
1.2 مربع حوار الفرز
في مجموعة Sort & Filter ضمن علامة التبويب البيانات، يوجد زر فرز آخر، انظر الصورة:
بعد النقر على زر Sort هذا، سيظهر مربع حوار الفرز كما هو موضح في الصورة أدناه:
بعد ذلك، في مربع حوار الفرز، يمكنك اختيار القواعد المناسبة لفرز البيانات حسب حاجتك.
نصيحة: يمكنك أيضًا استخدام اختصارات لوحة المفاتيح لفتح مربع حوار الفرز هذا، يرجى الضغط على مفاتيح Alt + A + S + S بالتتابع على لوحة المفاتيح.
1.3 خيارات الفرز في قائمة التصفية
إذا قمت بتطبيق عوامل التصفية على نطاق بياناتك، يمكنك أيضًا العثور على خيارات الفرز مع خيارات التصفية. عند النقر على أيقونة التصفية في أي عمود، ستظهر خيارات الفرز في القائمة الموسعة كما هو موضح في الصورة أدناه:
ملاحظة: ستتغير خيارات الفرز هذه بناءً على البيانات في العمود: إذا كان هناك نص في العمود، سيظهر Sort A to Z وSort Z to A؛ إذا كانت هناك أرقام، سيظهر Sort Smallest to Largest وSort Largest to Smallest؛ إذا كانت هناك تواريخ، سيظهر Sort Oldest to Newest وSort Newest to Oldest.
1.4 خيارات الفرز بزر الفأرة الأيمن
في Excel، يمكنك أيضًا استخدام خيارات الفرز بزر الفأرة الأيمن لفرز البيانات بسرعة وسهولة، فقط انقر بزر الفأرة الأيمن على أي خلية في عمود يحتوي على قيم تريد فرزها، وستجد في القائمة السياقية ستة خيارات للفرز متاحة، اختر الخيار الذي تحتاجه، انظر الصورة:
الاستخدامات الأساسية للفرز
تساعدك ميزة الفرز في Excel على إجراء بعض عمليات الفرز البسيطة، مثل فرز الأرقام أو السلاسل النصية أو التواريخ تصاعديًا أو تنازليًا، أو فرز الخلايا بناءً على لون الخط أو لون الخلفية. ستتناول هذه الفقرة بعض الاستخدامات الأساسية لهذه الميزة.
2.1 فرز البيانات حسب النصوص أو الأرقام أو التواريخ
لفرز نطاق من البيانات بناءً على النصوص أو الأرقام أو التواريخ تصاعديًا أو تنازليًا، يرجى اتباع الخطوات التالية:
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على البيانات > فرز، انظر الصورة:
2. في مربع حوار الفرز، قم بالإجراءات التالية:
- في قسم العمود، اختر اسم العمود الذي تريد الفرز بناءً عليه؛
- في قسم Sort On، اختر خيار Cell Values؛
- في قسم Order، حدد ترتيب الفرز. (لفرز النصوص، اختر A to Z أو Z to A؛ لفرز الأرقام، اختر Smallest to Largest أو Largest to Smallest؛ لفرز التواريخ، اختر Oldest to Newest أو Newest to Oldest.)
- نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، قم بإلغاء تفعيل هذا الخيار.
3. ثم انقر على زر OK، وسيتم فرز البيانات المحددة بناءً على العمود الذي حددته مباشرة.
2.2 فرز البيانات حسب لون الخلية أو لون الخط أو أيقونة الخلية
إذا كنت ترغب في فرز نطاق البيانات بناءً على لون الخلية أو لون الخط أو أيقونة التنسيق الشرطي، يمكن لميزة الفرز حل هذه المهمة بسرعة.
افترض أن لديك نطاق بيانات تم تنسيقه بألوان الخلايا كما هو موضح في الصورة أدناه، إذا كنت بحاجة إلى إعادة ترتيب البيانات بناءً على لون الخلية، على سبيل المثال، ترغب في وضع الصفوف ذات اللون الأحمر الفاتح في الأعلى، تليها الصفوف الصفراء الفاتحة ثم الزرقاء الفاتحة، لفرز الصفوف حسب لون الخلية، يرجى اتباع ما يلي:
1. حدد نطاق البيانات الذي تريد فرزه بناءً على لون الخلية، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز، حدد العمليات التالية:
2.1) عيّن لون الخلية الأول في الأعلى كما يلي:
- في قسم العمود، اختر Name أو أي عمود آخر يحتوي على خلايا ملونة. في هذا المثال، لدي خلايا ملونة في جميع الأعمدة، يمكنك اختيار أي اسم عمود؛
- ضمن قسم Sort On، يرجى اختيار خيار Cell Color؛
- في قسم Order، اختر لون الخلية الذي تريد وضعه في الأعلى أو الأسفل؛
2.2) ثم انقر على زر Add Level لإضافة القاعدة الثانية وغيرها، وكرر الخطوات السابقة لتعيين ألوان الخلايا الأخرى.
- نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. بعد الانتهاء من الإعدادات، انقر على زر OK، وسيتم فرز نطاق البيانات حسب لون الخلية الذي حددته، انظر الصورة:
نصائح: وفقًا للخطوات السابقة، يمكنك أيضًا فرز البيانات حسب لون الخط أو أيقونة الخلية عن طريق اختيار لون الخط أو أيقونة التنسيق الشرطي في مربع حوار الفرز.
2.3 فرز البيانات حسب أعمدة متعددة
إذا كان لديك مجموعة بيانات كبيرة كما هو موضح في الصورة أدناه، وتريد الآن إجراء فرز متعدد المستويات لقراءة البيانات بشكل أوضح، على سبيل المثال، الفرز حسب عمود المنطقة أولاً، ثم عمود الولاية، وأخيرًا عمود المبيعات. كيف يمكنك تنفيذ هذا الفرز في Excel؟
لفرز البيانات حسب عدة أعمدة، يرجى اتباع الخطوات التالية:
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز، انقر على زر Add Level مرتين لأن هناك ثلاثة أعمدة تريد استخدامها للفرز. بعد ذلك ستلاحظ إضافة مستويين Then by إلى قائمة القواعد:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. من قوائم Sort by وThen by المنسدلة، اختر أسماء الأعمدة التي تريد الفرز بناءً عليها، ثم اختر Cell Values من قسم Sort On لكل عمود محدد، وأخيرًا حدد ترتيب الفرز حسب حاجتك.
4. ثم انقر على OK، وستحصل على نتيجة الفرز كما هو موضح في الصورة أدناه:
2.4 فرز البيانات بناءً على قائمة مخصصة
بدلاً من فرز البيانات ترتيبًا أبجديًا أو رقميًا، توفر ميزة الفرز أيضًا إمكانية الفرز حسب قائمة مخصصة. على سبيل المثال، ترغب في فرز نطاق البيانات أدناه حسب الحالة - لم يبدأ، قيد التقدم، مكتمل - التي قمت بتحديدها. هنا سأوضح لك كيفية التعامل مع هذا النوع من الفرز.
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز، اختر العمود الذي تريد الفرز بناءً عليه من قسم العمود، ثم اختر Cell Values من قسم Sort On، وفي قسم Order، انقر على خيار Custom List، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ستظهر نافذة Custom Lists، يرجى تنفيذ العمليات التالية:
- انقر على NEW LIST في نافذة القوائم المخصصة؛
- أدخل السلاسل النصية بالترتيب الذي ترغب في الفرز به في مربع List entries؛ (عند إدخال النصوص، اضغط على مفتاح Enter للفصل بين الإدخالات.)
- أخيرًا، انقر على زر Add، وستتم إضافة القائمة الجديدة إلى نافذة القوائم المخصصة مباشرة.
4. ثم انقر على زر OK للعودة إلى مربع حوار الفرز. ستظهر القائمة المخصصة الجديدة الآن في قائمة Order المنسدلة.
5. بعد ذلك، انقر على زر OK لإغلاق مربع الحوار، وكنتيجة، سيتم فرز نطاق البيانات حسب القائمة المخصصة التي حددتها، انظر الصورة:
2.5 فرز البيانات من اليسار إلى اليمين (فرز أفقي)
عادةً، يتم فرز جدول البيانات عموديًا من الأعلى إلى الأسفل، ولكن أحيانًا قد ترغب في فرز البيانات بناءً على قيم الصفوف (من اليسار إلى اليمين). على سبيل المثال، في نطاق البيانات أدناه، أريد فرزه بناءً على القيم في صف الاسم.
في هذه الحالة، توفر ميزة الفرز وظيفة مدمجة تتيح لك الفرز من اليسار إلى اليمين. يرجى اتباع الخطوات التالية:
1. حدد نطاق البيانات (بدون الرؤوس) الذي تريد فرزه، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز المنبثق، انقر على زر Options، ثم في مربع حوار Sort Options، اختر خيار Sort left to right، انظر الصورة:
3. انقر على OK للعودة إلى مربع الفرز، الآن في قسم الصف، حدد رقم الصف الذي تريد الفرز بناءً عليه، ثم اختر Cell Values في قسم Sort On، وأخيرًا حدد ترتيب الفرز في قسم Order حسب حاجتك، انظر الصورة:
4. ثم انقر على OK، وسيتم فرز بياناتك كما هو موضح في الصورة أدناه:
2.6 فرز البيانات مع مراعاة حالة الأحرف
عادةً، لا يتم فرز البيانات مع مراعاة حالة الأحرف كما هو موضح في الصورة الأولى أدناه. ولكن ماذا لو أردت أن يكون الفرز حساسًا لحالة الأحرف، كما في الصورة الثانية أدناه؟ كيف يمكنك حل هذه المهمة في Excel؟
لإجراء فرز حساس لحالة الأحرف في Excel، يرجى اتباع ما يلي:
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز، في قسم العمود، حدد اسم العمود الذي تريد الفرز بناءً عليه، ثم اختر Cell Values في قسم Sort On، وأخيرًا حدد ترتيب الفرز في قسم Order حسب حاجتك، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. تابع بالنقر على زر Options في مربع الحوار هذا، وفي مربع حوار Sort Options، فعّل خيار Case sensitive، انظر الصورة:
4. انقر على OK > OK لإغلاق مربعات الحوار، وسيتم فرز البيانات مع مراعاة حالة الأحرف بحيث تظهر الأحرف الصغيرة أولاً ثم الأحرف الكبيرة عند تساوي النص. انظر الصورة:
الاستخدامات المتقدمة للفرز
قد تواجه في عملك اليومي مشكلات فرز أكثر تعقيدًا وتخصصًا وعملية، ستتناول هذه الفقرة أنواعًا متعددة من مهام الفرز في Excel.
3.1 فرز البيانات بناءً على التكرار
افترض أن لديك قائمة بيانات في عمود، وتريد الآن فرز هذا العمود ترتيبًا تنازليًا حسب تكرار ظهور البيانات كما هو موضح في الصورة أدناه. هنا سأقدم طريقتين لحل هذه المهمة.
فرز البيانات بناءً على التكرار باستخدام عمود مساعد
لا توجد طريقة مباشرة في Excel لفرز البيانات حسب عدد مرات الظهور، ولكن يمكنك إنشاء صيغة مساعدة لحساب تكرار كل نص، ثم الفرز حسب العمود المساعد للحصول على النتيجة المطلوبة.
1. اكتب الصيغة أدناه في خلية فارغة بجوار البيانات الأصلية، مثل B2، ثم اسحب مقبض التعبئة لأسفل لتطبيق الصيغة على بقية الخلايا، انظر الصورة:
=COUNTIF($A$2:$A$16,A2)
ملاحظة: في الصيغة أعلاه، A2:A16 هي القائمة التي تريد فرزها حسب التكرار، وA2 هي أول قيمة في هذه القائمة.
2. ثم، مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصور:
3. بعد ذلك، انقر على زر Sort، وسيتم فرز العمود الأصلي حسب التكرار كما هو موضح في الصور التالية:
1. بعد الحصول على النتيجة، يمكنك حذف العمود المساعد إذا رغبت.
2. إذا ظهرت نصوص بنفس عدد مرات الظهور، قد لا يتم فرز النصوص المتشابهة معًا. في هذه الحالة، يجب الانتقال إلى فرز مربع الحوار، والفرز أولاً حسب العمود المساعد، ثم حسب النص كما هو موضح في الصورة أدناه:
فرز البيانات بناءً على التكرار باستخدام ميزة سهلة
إذا كان لديك Kutools لـ Excel، يمكنك باستخدام ميزة الفرز المتقدم Advanced Sort فرز البيانات حسب عدد مرات الظهور دون الحاجة لأي عمود مساعد بسرعة وسهولة.
1. حدد قائمة البيانات التي تريد فرزها، ثم انقر على Kutools Plus > Sort > Advanced Sort، انظر الصورة:
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز بناءً عليه من قسم العمود، ثم اختر Frequency من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز في قسم Order، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم انقر على زر OK، وسيتم فرز قائمة البيانات حسب عدد مرات الظهور مباشرة، انظر الصورة:
3.2 فرز البيانات بناءً على طول الأحرف
إذا كان لديك قائمة بيانات تحتوي على سلاسل نصية بأطوال مختلفة، قد تحتاج إلى فرز البيانات حسب عدد الأحرف لجعل العمود أكثر ترتيبًا. ستتناول هذه الفقرة كيفية فرز البيانات حسب عدد الأحرف.
فرز البيانات بناءً على طول الأحرف باستخدام عمود مساعد
لفرز عمود حسب طول الأحرف، استخدم دالة LEN لحساب عدد الأحرف في كل خلية، ثم طبق ميزة الفرز لفرز القائمة، يرجى اتباع الخطوات التالية:
1. أدخل هذه الصيغة =LEN(A2) في خلية فارغة بجوار البيانات الأصلية، مثل B2، ثم اسحب مقبض التعبئة لأسفل لتطبيق الصيغة، انظر الصورة:
2. ثم، مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم فرز السلاسل حسب طول الأحرف. يمكنك حذف العمود المساعد B إذا رغبت. انظر الصورة:
فرز البيانات بناءً على طول الأحرف باستخدام خيار سريع
لفرز البيانات حسب عدد الأحرف بسرعة وسهولة، أوصي باستخدام أداة Kutools لـ Excel، حيث توفر ميزة الفرز المتقدم Advanced Sort التي تسهل عليك هذه المهمة.
1. حدد قائمة البيانات التي تريد فرزها، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Text length من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز الذي تحتاجه في قسم Order. انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم انقر على زر OK، وسيتم فرز السلاسل النصية في القائمة حسب طول الأحرف كما هو موضح في الصورة أدناه:
3.3 فرز الأسماء الكاملة حسب الاسم الأخير
عند فرز قائمة من الأسماء الكاملة، سيستخدم Excel الحرف الأول من الاسم للفرز، ولكن ماذا لو أردت الفرز حسب الاسم الأخير؟ هنا سأقدم لك بعض الحيل لفرز الأسماء الكاملة حسب الاسم الأخير بسهولة في Excel.
فرز الأسماء الكاملة حسب الاسم الأخير باستخدام عمود مساعد
لفرز الأسماء الكاملة بناءً على الاسم الأخير، يجب استخراج الأسماء الأخيرة في عمود جديد، ثم استخدام ميزة الفرز لترتيب الأسماء الكاملة أبجديًا حسب الاسم الأخير. يرجى اتباع الخطوات التالية:
1. أدخل أو انسخ الصيغة أدناه في خلية فارغة بجوار البيانات الأصلية، مثل B2، ثم اسحب مقبض التعبئة لأسفل لتطبيق الصيغة، انظر الصورة:
=RIGHT(A2,LEN(A2)-FIND("@",SUBSTITUTE(A2," ","@",LEN(A2)-LEN(SUBSTITUTE(A2," ","")))))
2. تابع بتحديد خلايا الصيغة، ثم انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وستحصل على الأسماء الكاملة مرتبة حسب الاسم الأخير، وبعد الانتهاء يمكنك حذف العمود المساعد إذا رغبت. انظر الصورة:
فرز الأسماء الكاملة حسب الاسم الأخير بطريقة سريعة
إذا لم تكن معتادًا على الصيغ، يمكنك فرز الأسماء الكاملة حسب الاسم الأخير دون أي صيغة باستخدام ميزة الفرز المتقدم Advanced Sort في Kutools لـ Excel.
1. حدد خلايا الأسماء الكاملة التي تريد فرزها، وانقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Last name من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز حسب حاجتك في قسم Order. انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم انقر على زر OK، وسيتم فرز عمود الأسماء الكاملة حسب الأسماء الأخيرة مباشرة.
3.4 فرز عناوين البريد الإلكتروني حسب النطاق
إذا كان لديك قائمة بعناوين البريد الإلكتروني وتريد فرزها حسب النطاق بدلاً من الحرف الأول من العنوان، كيف يمكنك تحقيق ذلك في Excel؟ ستتناول هذه الفقرة بعض الطرق السريعة لفرز عناوين البريد الإلكتروني حسب النطاقات.
فرز عناوين البريد الإلكتروني حسب النطاق باستخدام عمود مساعد
يمكنك هنا إنشاء صيغة لاستخراج نطاقات البريد الإلكتروني في عمود آخر، ثم فرز العناوين الأصلية بناءً على عمود النطاق الجديد.
1. اكتب الصيغة التالية في خلية فارغة بجوار عنوان البريد الإلكتروني، في هذا المثال سأدخل الصيغة في الخلية C2، ثم اسحب مقبض التعبئة إلى النطاق المطلوب. سيتم استخراج جميع نطاقات البريد الإلكتروني من العناوين، انظر الصورة:
=RIGHT(B2,LEN(B2)-FIND("@",B2))
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع الحوار Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort لفرز البيانات حسب نطاقات البريد الإلكتروني تصاعديًا أو تنازليًا حسب ما حددت.
4. بعد الفرز، يمكنك حذف العمود المساعد إذا رغبت.
فرز عناوين البريد الإلكتروني حسب النطاق بعدة نقرات فقط
إذا كان لديك Kutools لـ Excel، يمكنك باستخدام ميزة الفرز المتقدم Advanced Sort فرز عناوين البريد الإلكتروني حسب أسماء النطاقات أبجديًا بعدة نقرات فقط.
1. حدد نطاق البيانات بالكامل الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Mail domain من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز الذي تحتاجه في قسم Order. انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. انقر على OK، وسيتم فرز نطاق البيانات حسب نطاقات البريد الإلكتروني كما هو موضح في الصورة أدناه:
3.5 فرز عمود لمطابقة عمود آخر
إذا كان لديك عمودان يحتويان على بيانات متطابقة أو شبه متطابقة ولكن بترتيب مختلف، قد تحتاج إلى فرز العمودين بحيث تتطابق القيم في الصفوف نفسها في كلا العمودين. في هذه الفقرة سأوضح حالتين لهذا النوع من الفرز.
فرز عمودين يحتويان على نفس العناصر تمامًا للمطابقة
على سبيل المثال، لدي عمودان يحتويان على نفس العناصر ولكن بترتيب مختلف، هنا أريد فرز العمود الثاني لمطابقة العمود الأول كما هو موضح في الصورة أدناه.
1. اكتب الصيغة أدناه في خلية فارغة بجوار بياناتك الأصلية، ثم اسحب مقبض التعبئة لتطبيق الصيغة على جميع الخلايا في القائمة، وستعيد هذه الصيغة موضع كل قيمة في العمود B مقابل العمود A، انظر الصورة:
=MATCH(B2,$A$2:$A$10,0)
2. ثم حدد العمود B والعمود المساعد الجديد، وانقر على البيانات > فرز للانتقال إلى مربع حوار الفرز، وفي مربع الحوار الفرز، قم بما يلي:
- اختر العمود المساعد الذي تريد الفرز بناءً عليه من قسم العمود؛
- ثم اختر Cell Values في قسم Sort On؛
- أخيرًا، اختر خيار Smallest to Largest في قسم Order.
3. بعد ذلك، انقر على زر OK. الآن ستحصل على عمودين متطابقين تمامًا كما هو موضح في الصورة أدناه. يمكنك حذف عمود الصيغة إذا رغبت.
فرز عمودين لا يحتويان على نفس العناصر تمامًا للمطابقة
أحيانًا قد لا تكون العناصر في العمودين متطابقة تمامًا. على سبيل المثال، أريد فرز البيانات في العمود الثاني لمطابقة البيانات في العمود الأول بحيث تتطابق القيم نفسها في الصفوف نفسها كما هو موضح في الصورة أدناه.
1. أدخل عمودًا فارغًا جديدًا بين العمودين.
2. أدخل الصيغة أدناه في الخلية B2، ثم اسحب مقبض التعبئة لتطبيق الصيغة على الخلايا المطلوبة. الآن ستلاحظ أن البيانات في العمود C قد تم فرزها لمطابقة البيانات في العمود A.
=IF(ISNA(MATCH(A2,$C$2:$C$8,0)),"",INDEX($C$2:$C$8,MATCH(A2,$C$2:$C$8,0)))
3.6 فرز واستخراج القيم الفريدة من قائمة بيانات
إذا كان لديك قائمة قيم تحتوي على بعض التكرارات، وتريد فقط استخراج القيم الفريدة وفرزها أبجديًا كما هو موضح في الصورة أدناه، هنا سأقدم بعض الصيغ للتعامل مع هذا النوع من الفرز.
1. يرجى إدخال الصيغة أدناه في خلية فارغة – C2، ثم اضغط على مفاتيح Ctrl + Shift + Enter للحصول على أول نتيجة، انظر الصورة:
=IFERROR(INDEX($A$2:$A$12,MATCH(0,COUNTIF($A$2:$A$12,"<"&$A$2:$A$12)-SUM(COUNTIF($A$2:$A$12,"="&C$1:C1)),0)),"")
ملاحظة: في الصيغة، A2:A12 هي قائمة البيانات التي تريد استخراج القيم الفريدة منها، وC1 هي الخلية أعلى الصيغة التي وضعتها. يرجى تعديلها حسب حاجتك.
2. ثم اسحب مقبض التعبئة لاستخراج القيم حتى تظهر خلايا فارغة، سيتم استخراج جميع القيم الفريدة وفرزها تصاعديًا، انظر الصورة:
1. إذا كنت تريد استخراج القيم الفريدة بترتيب تنازلي، يرجى تطبيق الصيغة أدناه: (تذكر الضغط على مفاتيح Ctrl + Shift + Enter)
=IFERROR(INDEX($A$2:$A$12,MATCH(0,COUNTIF($A$2:$A$12,">"&$A$2:$A$12)-SUM(COUNTIF($A$2:$A$12,"="&C$1:C1)),0)),"")
2. إذا كانت قائمة البيانات تحتوي على خلايا فارغة أو قيم رقمية، لن تعمل الصيغة أعلاه، في هذه الحالة استخدم الصيغ التالية: (تذكر الضغط على مفاتيح Ctrl + Shift + Enter)
=IFERROR(SMALL(IF((COUNTIF($C$1:C1,$A$2:$A$12)=0)*ISNUMBER($A$2:$A$12),$A$2:$A$12,"A"),1),INDEX($A$2:$A$12,MATCH(SMALL(IF(ISTEXT($A$2:$A$12)*(COUNTIF(C1:$C$1,$A$2:$A$12)=0),COUNTIF($A$2:$A$12,"<"&$A$2:$A$12),""),1),IF(ISTEXT($A$2:$A$12),COUNTIF($A$2:$A$12,"<"&$A$2:$A$12),""),0)))
3.7 فرز عدة صفوف أو أعمدة بشكل مستقل دفعة واحدة
من السهل فرز نطاق بيانات بناءً على صف أو عمود واحد، ولكن أحيانًا قد ترغب في ترتيب كل صف أو عمود في النطاق أبجديًا بشكل مستقل، كيف يمكنك تحقيق ذلك في Excel؟
فرز عدة صفوف بشكل فردي
افترض أن لديك نطاق بيانات يجب إعادة ترتيبه أبجديًا في كل صف كما هو موضح في الصورة أدناه، لحل هذه المشكلة، إليك طريقتان سريعتان.
فرز عدة صفوف بشكل مستقل دفعة واحدة باستخدام صيغة
1. انسخ تسميات الصفوف إلى مكان آخر حيث تريد الحصول على النتيجة المرتبة.
2. ثم انسخ أو أدخل الصيغة أدناه في خلية فارغة – H2، ثم اضغط على مفاتيح Ctrl + Shift + Enter معًا للحصول على أول نتيجة، انظر الصورة:
=INDEX($B2:$E2, MATCH(COLUMNS($B2:B2), COUNTIF($B2:$E2, "<="&$B2:$E2),0))
3. ثم حدد الخلية H2 واسحب مقبض التعبئة إلى اليمين لنسخ الصيغة إلى خلايا الصف الأول الأخرى، في هذا المثال اسحب حتى الخلية K2، انظر الصورة:
4. تابع بتحديد خلايا الصيغة في الصف الأول (H2:K2)، واسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الصفوف الأخرى. الآن ستلاحظ أن القيم في كل صف تم ترتيبها بشكل مستقل تصاعديًا.
فرز عدة صفوف بشكل مستقل دفعة واحدة باستخدام كود VBA
يمكن أن يساعدك الكود VBA التالي أيضًا في فرز البيانات في كل صف أبجديًا بسهولة. يرجى اتباع الخطوات التالية:
1. حدد البيانات التي تريد فرزها في كل صف.
2. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
3. ثم انقر على Insert > Module، والصق الكود التالي في نافذة Module.
كود VBA: فرز عدة صفوف بشكل مستقل دفعة واحدة
Sub SortIndividualR()
'Updateby Extendoffice
Dim xRg As Range, yRg As Range
If TypeName(Selection) <> "Range" Then Exit Sub
Set xRg = Selection
If xRg.Count = 1 Then
MsgBox "Select multiple cells!", vbExclamation, "Kutools for Excel"
Exit Sub
End If
With Application
.ScreenUpdating = False
.EnableEvents = False
.Calculation = xlCalculationManual
End With
Application.ScreenUpdating = False
For Each yRg In xRg.Rows
yRg.Sort Key1:=yRg.Cells(1, 1), _
Order1:=xlAscending, _
Header:=xlNo, _
Orientation:=xlSortRows
Next yRg
With Application
.ScreenUpdating = True
.EnableEvents = True
.Calculation = xlCalculationAutomatic
End With
Application.ScreenUpdating = True
End Sub
4. ثم اضغط على مفتاح F5 لتشغيل الكود، وسيتم فرز البيانات في كل صف تصاعديًا فورًا، انظر الصورة:
فرز عدة أعمدة بشكل فردي
لفرز البيانات في كل عمود بشكل مستقل، يمكن للطريقتين التاليتين مساعدتك.
فرز عدة أعمدة بشكل مستقل دفعة واحدة باستخدام صيغة
1. انسخ تسميات الأعمدة إلى مكان آخر حيث تريد الحصول على النتيجة المرتبة.
2. ثم أدخل الصيغة أدناه في خلية فارغة – F3، واضغط على مفاتيح Ctrl + Shift + Enter معًا للحصول على أول نتيجة، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الصفوف الأخرى، انظر الصورة:
=INDEX(A$3:A$6,MATCH(ROWS(A$3:A3),COUNTIF(A$3:A$6,"<="&A$3:A$6),0))
3. تابع بتحديد خلايا الصيغة في الصف الأول (F3:F6)، واسحب مقبض التعبئة إلى اليمين لنسخ الصيغة إلى الأعمدة الأخرى. الآن ستلاحظ أن القيم في كل عمود تم ترتيبها بشكل مستقل تصاعديًا كما هو موضح في الصورة أدناه:
فرز عدة أعمدة بشكل مستقل دفعة واحدة باستخدام كود VBA
لفرز البيانات في عدة أعمدة بشكل مستقل، يمكن أن يساعدك الكود VBA التالي أيضًا، يرجى اتباع ما يلي:
1. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. ثم انقر على Insert > Module، والصق الكود التالي في نافذة Module.
كود VBA: فرز عدة أعمدة بشكل مستقل دفعة واحدة
Sub SortIndividualJR()
'Updateby Extendoffice
Dim xRg As Range
Dim yRg As Range
Dim ws As Worksheet
Set ws = ActiveSheet
On Error Resume Next
Set xRg = Application.InputBox(Prompt:="Range Selection:", _
Title:="Kutools for excel", Type:=8)
Application.ScreenUpdating = False
For Each yRg In xRg
With ws.Sort
.SortFields.Clear
.SortFields.Add Key:=yRg, Order:=xlAscending
.SetRange ws.Range(yRg, yRg.End(xlDown))
.Header = xlNo
.MatchCase = False
.Apply
End With
Next yRg
Application.ScreenUpdating = True
End Sub
3. ثم اضغط على مفتاح F5 لتشغيل الكود، وستظهر نافذة منبثقة، يرجى تحديد نطاق البيانات الذي تريد فرزه، انظر الصورة:
4. بعد ذلك، انقر على OK، وسيتم فرز كل عمود بشكل مستقل بسرعة.
3.8 فرز البيانات عشوائيًا في Excel
من الشائع فرز البيانات أبجديًا تصاعديًا أو تنازليًا، ولكن هل جربت يومًا فرز البيانات في نطاق محدد عشوائيًا؟ في هذه الفقرة سأوضح كيفية خلط نطاق من الخلايا بترتيب عشوائي.
فرز عمود من البيانات عشوائيًا باستخدام عمود مساعد
عادةً، يمكنك استخدام دالة RAND للحصول على أرقام عشوائية، ثم فرز البيانات بناءً على هذه القائمة العشوائية، يرجى اتباع ما يلي:
1. أدخل هذه الصيغة: =RAND() في خلية فارغة بجوار بياناتك، واسحب مقبض التعبئة لأسفل لملء قائمة من الأرقام العشوائية كما هو موضح في الصورة أدناه:
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم خلط قائمة البيانات مباشرة، انظر الصورة:
فرز الخلايا أو الصفوف أو الأعمدة عشوائيًا باستخدام ميزة مذهلة
يدعم Kutools لـ Excel ميزة قوية – فرز عشوائي للنطاق Sort Range Randomly، حيث يمكنك من خلال هذه الوظيفة عشوائية البيانات في نطاق من الخلايا، أو في كل عمود / صف من التحديد، أو عشوائية الصفوف أو الأعمدة بالكامل دفعة واحدة.
1. حدد نطاق البيانات الذي تريد فرزه عشوائيًا، ثم انقر على Kutools Plus > Sort > Sort Range Randomly. انظر الصورة:
2. في مربع الحوار Sort/Select Range Randomly، ضمن علامة التبويب Sort، اختر أحد الخيارات التالية حسب حاجتك:
- الصفوف بالكامل: خلط الصفوف بالكامل في النطاق المحدد عشوائيًا.
- الأعمدة بالكامل: خلط الأعمدة بالكامل في النطاق المحدد عشوائيًا.
- الخلايا في كل صف: خلط الخلايا في كل صف بشكل فردي.
- الخلايا في كل عمود: خلط الخلايا في كل عمود بشكل فردي.
- جميع الخلايا في النطاق: عشوائية جميع الخلايا في النطاق المحدد.
3. بعد ذلك، انقر على زر Ok، وسيتم عشوائية البيانات فورًا.
3.9 فرز قائمة تواريخ حسب الشهر أو اليوم أو الشهر واليوم
عند فرز التواريخ في Excel، ستقوم ميزة الفرز بترتيب قائمة التواريخ حسب السنة والشهر واليوم افتراضيًا، ولكن في بعض الحالات قد تحتاج إلى ترتيب التواريخ حسب الشهر أو اليوم أو الشهر واليوم مع تجاهل السنة. كيف تحل هذه المشكلة في Excel؟
فرز قائمة تواريخ حسب الشهر أو اليوم باستخدام عمود مساعد
لفرز التواريخ بناءً على الشهر أو اليوم فقط، يمكنك استخراج أرقام الشهر أو اليوم من التواريخ، ثم فرز التواريخ حسب عمود الشهر أو اليوم المستخرج.
1. يرجى إدخال الصيغة أدناه في خلية فارغة بجوار بياناتك، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الخلايا الأخرى، انظر الصورة:
=MONTH(B2) (استخراج رقم الشهر)
=DAY(B2) (استخراج رقم اليوم)
2. بعد استخراج أرقام الشهر أو اليوم، مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم الآن فرز التواريخ حسب الشهر مع تجاهل السنوات والأيام. انظر الصورة:
فرز قائمة تواريخ حسب الشهر أو اليوم بعدة نقرات فقط
إذا كان لديك Kutools لـ Excel، يمكنك باستخدام ميزة الفرز المتقدم Advanced Sort فرز قائمة التواريخ حسب الشهر أو اليوم فقط بعدة نقرات.
Kutools لـ Excel - مزود بأكثر من 300 أدوات أساسية لبرنامج Excel. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Month أو Day من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز الذي تحتاجه في قسم Order.
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم انقر على زر OK، وسيتم فرز البيانات حسب الشهر أو اليوم كما حددت مع تجاهل السنة، انظر الصورة:
فرز قائمة تواريخ حسب الشهر واليوم باستخدام عمود مساعد
إذا كنت بحاجة إلى فرز قائمة تواريخ حسب الشهر واليوم فقط دون السنة، يمكنك استخدام دالة TEXT لتحويل التاريخ إلى سلسلة نصية بالتنسيق المطلوب، ثم تطبيق ميزة الفرز حسب الحاجة.
1. أدخل الصيغة أدناه في خلية فارغة بجوار بياناتك، ثم انسخ الصيغة لأسفل حتى نهاية بياناتك، وسيتم استخراج الشهر واليوم كسلسلة نصية كما هو موضح في الصورة أدناه:
=TEXT(B2,"MMDD")
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم الآن فرز بياناتك حسب الشهر واليوم فقط.
3.10 فرز قائمة تواريخ حسب أيام الأسبوع
لفرز قائمة تواريخ حسب أيام الأسبوع، أي فرز التواريخ من الاثنين إلى الأحد أو من الأحد إلى السبت. في هذه الفقرة سأوضح طريقتين لإنجاز هذه المهمة في Excel.
فرز قائمة تواريخ حسب أيام الأسبوع باستخدام عمود مساعد
لفرز التواريخ حسب أيام الأسبوع، ستحتاج أيضًا إلى عمود مساعد لإرجاع رقم يمثل يوم الأسبوع، ثم فرز التواريخ حسب العمود المساعد.
1. يرجى إدخال أو نسخ الصيغة أدناه في خلية فارغة، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الخلايا الأخرى، انظر الصورة:
=WEEKDAY(B2)(يبدأ من الأحد (1) إلى السبت (7))
=WEEKDAY(B2,2)(يبدأ من الاثنين (1) إلى الأحد (7))
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort للحصول على نتيجة الفرز المطلوبة، انظر الصورة:
فرز قائمة تواريخ حسب أيام الأسبوع باستخدام خيار سهل
بمساعدة ميزة الفرز المتقدم Advanced Sort في Kutools لـ Excel، يمكنك حل هذه المشكلة بسرعة دون الحاجة لأي صيغة مساعدة.
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Day of the week من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز الذي تحتاجه في قسم Order.
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم انقر على زر OK، وسيتم فرز البيانات حسب أيام الأسبوع كما تريد. انظر الصورة:
3.11 فرز قائمة تواريخ حسب الربع السنوي
ستتناول هذه الفقرة كيفية فرز قائمة تواريخ حسب الربع السنوي مع تجاهل السنة، وسيتم تقديم طريقتين لك.
فرز قائمة تواريخ حسب الربع السنوي باستخدام عمود مساعد
كما في الحلول السابقة، يجب عليك إنشاء عمود مساعد بصيغة لاستخراج رقم الربع من التواريخ، ثم فرز التواريخ بناءً على هذا العمود الجديد.
1. يرجى إدخال أو نسخ الصيغة أدناه في خلية فارغة، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الخلايا الأخرى، انظر الصورة:
=ROUNDUP(MONTH(B2)/3,0)
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم فرز نطاق البيانات حسب الربع السنوي كما هو موضح في الصورة أدناه:
فرز قائمة تواريخ حسب الربع السنوي باستخدام ميزة سهلة
إذا كان لديك Kutools لـ Excel مثبتًا، يمكنك باستخدام ميزة الفرز المتقدم Advanced Sort حل هذه المهمة بعدة نقرات فقط.
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، اختر العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Quarter من قائمة Sort On المنسدلة، وأخيرًا حدد ترتيب الفرز الذي تحتاجه في قسم Order.
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. أخيرًا، انقر على زر OK، وسيتم فرز النطاق المحدد حسب الربع السنوي كما تريد.
3.12 فرز البيانات بناءً على أسماء الأشهر أو أيام الأسبوع
إذا كان لديك قائمة بأسماء الأشهر كنصوص، سيؤدي فرزها إلى ترتيبها أبجديًا بدلاً من ترتيب الأشهر من يناير إلى ديسمبر. إذا كنت بحاجة إلى فرز أسماء الأشهر من يناير إلى ديسمبر، قد يساعدك الفرز المخصص ضمن ميزة الفرز.
1. حدد نطاق البيانات الذي تريد فرزه بناءً على أسماء الأشهر، ثم انقر على البيانات > فرز للانتقال إلى مربع حوار الفرز.
2. في مربع حوار الفرز، في قسم العمود، اختر اسم العمود الذي يحتوي على أسماء الأشهر، وفي قسم Sort on اختر Cell Values، وأخيرًا في قسم Order اختر Custom List، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. ثم في مربع الحوار Custom List المنبثق، اختر أسماء الأشهر الكاملة (January, February, March, …) أو المختصرة (Jan, Feb, Mar…) حسب طريقة كتابة الأشهر في ورقتك، انظر الصورة:
4. بعد ذلك، انقر على OK > OK لإغلاق مربعات الحوار، وسيتم الآن فرز بياناتك حسب اسم الشهر ترتيبًا زمنيًا كما هو موضح في الصورة أدناه:
نصيحة: لفرز أسماء أيام الأسبوع، اختر الأسماء الكاملة (Sunday, Monday, Tuesday, …) أو المختصرة (Sun, Mon, Tue…) في مربع الحوار Custom Lists حسب حاجتك.
3.13 فرز البيانات بناءً على الأرقام الفردية أو الزوجية
قد يكون من السهل فرز الأرقام تصاعديًا أو تنازليًا في Excel، ولكن هل جربت يومًا فرز الأرقام من الفردي إلى الزوجي أو العكس في قائمة؟ في هذه الفقرة سأوضح بعض الطرق للقيام بذلك.
فرز البيانات حسب الأرقام الفردية أو الزوجية باستخدام عمود مساعد
لفرز قائمة الأرقام حسب الفردي أو الزوجي، يجب إنشاء صيغة لتحديد الأرقام الفردية أو الزوجية، ثم تطبيق ميزة الفرز.
1. بجوار قائمة الأرقام، أدخل هذه الصيغة =ISODD(A2) في خلية فارغة، ثم اسحب لنسخ الصيغة إلى الخلايا الأخرى، الآن ستظهر TRUE للأرقام الفردية وFALSE للأرقام الزوجية.
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم فرز جميع الأرقام الزوجية معًا ثم تليها الأرقام الفردية أو العكس. انظر الصورة:
فرز البيانات حسب الأرقام الفردية أو الزوجية باستخدام ميزة مفيدة
بمساعدة ميزة الفرز المتقدم Advanced Sort في Kutools لـ Excel، يمكنك بسرعة فرز الأرقام من الفردي إلى الزوجي أو العكس أيضًا.
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، انقر على العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Odd and even number من قسم Sort On، ثم حدد ترتيب الفرز (A to Z للفرز من الزوجي إلى الفردي، وZ to A للفرز من الفردي إلى الزوجي)، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل خيار My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. بعد ذلك، انقر على زر OK، وستحصل على النتائج التالية:
3.14 فرز البيانات بناءً على القيم المطلقة
إذا كان هناك أرقام موجبة وسالبة في العمود، عند الفرز سيتم ترتيب الأرقام تصاعديًا أو تنازليًا افتراضيًا في Excel. ولكن في بعض الحالات قد ترغب في تجاهل الإشارة السالبة عند الفرز، أي فرز الأرقام حسب القيم المطلقة. كيف تحقق ذلك في Excel؟
فرز البيانات حسب القيم المطلقة باستخدام عمود مساعد
لفرز الأرقام حسب القيم المطلقة، عادةً يجب إنشاء صيغة لتحويل جميع القيم إلى قيم مطلقة أولاً، ثم تطبيق ميزة الفرز لفرز الأرقام.
1. في خلية فارغة مجاورة، مثل B2، أدخل هذه الصيغة =ABS(A2)، ثم اسحب مقبض التعبئة لنسخ الصيغة إلى الخلايا الأخرى. الآن ستلاحظ أن جميع القيم تم تحويلها إلى قيم مطلقة:
2. مع استمرار تحديد خلايا الصيغة، انقر على البيانات > Sort A to Z أو Sort Z to A حسب حاجتك، وفي مربع التحذير المنبثق Sort Warning، اختر Expand the selection، انظر الصورة:
3. بعد ذلك، انقر على زر Sort، وسيتم فرز جميع الأرقام حسب القيم المطلقة كما هو موضح في الصورة أدناه:
فرز البيانات حسب القيم المطلقة باستخدام خيار سهل
إذا كنت لا ترغب في إنشاء عمود مساعد، أوصي باستخدام Kutools لـ Excel، حيث يمكنك باستخدام ميزة الفرز المتقدم Advanced Sort فرز الأرقام حسب القيم المطلقة مباشرة وبسهولة.
Kutools لـ Excel - مزود بأكثر من 300 أدوات أساسية لبرنامج Excel. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!
1. حدد نطاق البيانات الذي تريد فرزه، ثم انقر على Kutools Plus > Sort > Advanced Sort.
2. في مربع حوار Advanced Sort، انقر على العمود الذي تريد الفرز عليه في قسم العمود، ثم اختر Absolute value من قسم Sort On، ثم حدد ترتيب الفرز، انظر الصورة:
نصيحة: إذا كانت بياناتك تحتوي على رؤوس، تأكد من تفعيل My data has headers. إذا لم تكن هناك رؤوس، يرجى إلغاء تفعيله.
3. بعد ذلك، انقر على OK، وسيتم فرز جميع الأرقام من الأصغر إلى الأكبر أو من الأكبر إلى الأصغر مع تجاهل الإشارة السالبة.
فرز البيانات تلقائيًا عند إدخال أو تغيير البيانات
ميزة الفرز في Excel ليست ديناميكية، حيث يجب عليك إعادة فرز البيانات بعد كل تغيير أو عند إضافة بيانات جديدة. في هذه الفقرة سأناقش كيفية فرز بياناتك تلقائيًا في كل مرة يتم فيها إضافة قيمة جديدة إلى نطاق البيانات.
4.1 فرز القيم الرقمية تلقائيًا في عمود باستخدام الصيغ
لفرز قائمة أرقام تصاعديًا أو تنازليًا تلقائيًا، يمكنك استخدام صيغ تعتمد على دوال LARGE وSMALL وROW.
1. يرجى إدخال أو نسخ الصيغة أدناه في خلية فارغة بجوار بياناتك المصدر، ثم اسحب مقبض التعبئة لأسفل للخلايا التي تريد تطبيق الصيغة عليها، وسيتم ترتيب الأرقام من الأصغر إلى الأكبر، انظر الصورة:
=IFERROR(SMALL($A$2:$A$100,ROWS(B$2:B2)),"")
ملاحظة: في هذه الصيغة، A2:A100 هي قائمة الأرقام التي تريد فرزها تلقائيًا، مع تضمين بعض الخلايا الفارغة للإدخالات الجديدة، وB2 هي الخلية التي تدخل فيها الصيغة.
2. الآن، عند تغيير البيانات المصدر أو إدخال بيانات جديدة، سيتم تحديث القائمة المرتبة تلقائيًا كما هو موضح في العرض أدناه:
نصيحة: لفرز الأرقام تلقائيًا ترتيبًا تنازليًا، يرجى تطبيق الصيغة أدناه:
=IFERROR(LARGE($A$2:$A$100,ROWS(B$2:B2)),"")
4.2 فرز القيم النصية تلقائيًا في عمود باستخدام الصيغ
إذا كنت تريد فرز القيم النصية في عمود تلقائيًا، لن تعمل الصيغة السابقة، هنا قد تساعدك صيغة أخرى، يرجى اتباع ما يلي:
1. أدخل أو انسخ الصيغة أدناه في خلية فارغة بجوار عمود البيانات، ثم اضغط على مفاتيح Ctrl + Shift + Enter معًا للحصول على أول نص، ثم حدد خلية الصيغة واسحب مقبض التعبئة لأسفل للخلايا التي تريد فرزها، انظر الصورة:
=IFERROR(INDEX($A$2:$A$100,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$100,">="&$A$2:$A$100),0)),"")
2. من الآن فصاعدًا، عند إدخال قيمة أو تغيير البيانات الأصلية في العمود A، سيتم فرز السلاسل النصية في العمود B تصاعديًا تلقائيًا، انظر العرض أدناه:
نصيحة: لفرز السلاسل النصية تلقائيًا ترتيبًا تنازليًا، يرجى تطبيق الصيغة أدناه (تذكر الضغط على مفاتيح Ctrl + Shift + Enter):
=IFERROR(INDEX($A$2:$A$100,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$100,">="&$A$2:$A$100),0)),"")
4.3 فرز المزيج من القيم الرقمية والنصية تلقائيًا في عمود باستخدام كود VBA
إذا كان هناك قيم رقمية ونصية في عمود، لفرز القائمة تلقائيًا، قد يساعدك كود VBA أدناه.
1. انقر بزر الفأرة الأيمن على علامة تبويب الورقة التي تريد فرز البيانات فيها تلقائيًا، ثم اختر View Code من القائمة السياقية، وفي نافذة Microsoft Visual Basic for Applications المنبثقة، انسخ والصق الكود التالي في نافذة Module الفارغة، انظر الصورة:
كود VBA: فرز تلقائي عند إدخال أو تغيير البيانات ترتيبًا تصاعديًا:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
On Error Resume Next
If Application.Intersect(Target, Application.Columns(1)) Is Nothing Then Exit Sub
If Target.Count > 1 Then Exit Sub
Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
ملاحظة: في الكود أعلاه، سيتم فرز البيانات المدخلة تلقائيًا في العمود A. A1 هو الرأس، وA2 هي أول خلية في قائمة البيانات.
2. ثم احفظ وأغلق نافذة الكود. الآن، عند إدخال بيانات جديدة أو تغيير البيانات الأصلية في العمود A، سيتم فرز البيانات تلقائيًا ترتيبًا تصاعديًا. انظر العرض أدناه:
نصيحة: إذا كنت تريد فرز قائمة البيانات ترتيبًا تنازليًا، يرجى تطبيق الكود التالي:
كود VBA: فرز تلقائي عند إدخال أو تغيير البيانات ترتيبًا تنازليًا:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
On Error Resume Next
If Application.Intersect(Target, Application.Columns(1)) Is Nothing Then Exit Sub
If Target.Count > 1 Then Exit Sub
Range("A1").Sort Key1:=Range("A2"), Order1:=xlDescending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
حالات أخرى للفرز
قد تواجه احتياجات فرز متنوعة أخرى في عملك اليومي. في هذه الفقرة سأوضح بعض أنواع الفرز الأخرى، مثل فرز البيانات داخل الخلية، أو فرز البيانات في عمود أو صف بترتيب عكسي، وغيرها.
5.1 فرز البيانات داخل الخلية
لفرز سلسلة نصية داخل خلية واحدة ترتيبًا أبجديًا، على سبيل المثال، فرز النص "HDAW" ليصبح "ADHW"؛ أو فرز عدة كلمات مفصولة بفاصلة في خلية، مثل فرز "word, outlook, excel, access" ليصبح "access, excel, outlook, word". ستتناول هذه الفقرة كيفية حل هذا النوع من الفرز في Excel.
فرز قيمة نصية داخل الخلية ترتيبًا أبجديًا
لفرز قيمة نصية داخل الخلية ترتيبًا أبجديًا، يجب إنشاء دالة معرفة من قبل المستخدم. يرجى اتباع ما يلي:
1. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر على Insert > Module، والصق الكود التالي في نافذة Module.
كود VBA: فرز قيمة نصية داخل الخلية
Function SortCellContents(xRange As Range)
'Updateby Extendoffice
Dim xArr
Dim xF1, xF2 As Integer
Dim xStrValue As String
Dim xStrT As String
If xRange.Count <> 1 Then
Exit Function
End If
xStrValue = xRange.Value
ReDim xArr(1 To Len(xStrValue))
For xF1 = 1 To UBound(xArr)
xArr(xF1) = Mid(xStrValue, xF1, 1)
Next
For xF1 = 1 To UBound(xArr)
For xF2 = xF1 To UBound(xArr)
If Asc(xArr(xF2)) < Asc(xArr(xF1)) Then
xStrT = xArr(xF2)
xArr(xF2) = xArr(xF1)
xArr(xF1) = xStrT
End If
Next xF2
Next xF1
SortCellContents = Join(xArr, "")
End Function
3. ثم احفظ وأغلق هذا الكود، وارجع إلى ورقة العمل. بعد ذلك، أدخل هذه الصيغة =SortCellContents(A2) في خلية فارغة لإرجاع النتيجة، واسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الخلايا الأخرى، وسيتم فرز جميع القيم النصية في الخلايا ترتيبًا أبجديًا، انظر الصورة:
فرز السلاسل النصية المفصولة بفاصل داخل الخلية ترتيبًا أبجديًا
إذا كانت هناك عدة كلمات مفصولة بفواصل محددة في خلية، لفرزها ترتيبًا أبجديًا داخل الخلية، يمكن أن تساعدك الدالة المعرفة من قبل المستخدم أدناه.
1. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر على Insert > Module، والصق الكود التالي في نافذة Module.
كود VBA: فرز السلاسل النصية المفصولة بفاصلة داخل الخلية
Function SortCellWithSeparator(CellAddress As Range, DelimiterChar As String, IncludeSpaces As Boolean) As String
'Updateby Extendoffice
Dim xRg As Range
Dim xString As String
Dim xF1, xF2 As Integer
Dim xSArr
Dim xStrT As String
Dim xStrValue As String
Set xRg = CellAddress
xStrValue = WorksheetFunction.Substitute(xRg.Value, " ", "")
xSArr = Split(xStrValue, DelimiterChar)
For xF1 = 0 To UBound(xSArr)
For xF2 = xF1 + 1 To UBound(xSArr)
If xSArr(xF2) < xSArr(xF1) Then
xStrT = xSArr(xF2)
xSArr(xF2) = xSArr(xF1)
xSArr(xF1) = xStrT
End If
Next xF2
Next xF1
xStrValue = ""
For xF1 = 0 To UBound(xSArr)
xStrValue = xStrValue & xSArr(xF1) & DelimiterChar
Next xF1
SortCellWithSeparator = xStrValue
SortCellWithSeparator = Left(SortCellWithSeparator, Len(SortCellWithSeparator) - 1)
If IncludeSpaces = True Then SortCellWithSeparator = WorksheetFunction.Substitute(SortCellWithSeparator, ",", ", ")
End Function
3. ثم احفظ وأغلق هذا الكود، وارجع إلى ورقة العمل، وأدخل هذه الصيغة =SortCellWithSeparator(A2,",",TRUE) في خلية فارغة لإرجاع النتيجة، ثم اسحب مقبض التعبئة لأسفل لنسخ الصيغة إلى الخلايا الأخرى، وسيتم فرز جميع السلاسل النصية في الخلايا ترتيبًا أبجديًا، انظر الصورة:
ملاحظة: إذا كانت السلاسل النصية مفصولة بفواصل أخرى، فقط قم بتغيير الفاصلة في هذه الصيغة إلى الفاصل الخاص بك.
5.2 عكس / قلب ترتيب البيانات في عمود أو صف
أحيانًا قد تحتاج إلى عكس ترتيب البيانات رأسًا على عقب في نطاق بيانات رأسي أو من اليسار إلى اليمين في نطاق بيانات أفقي. ستوضح هذه الفقرة ثلاث طرق لحل هذه المهمة في Excel.
عكس / قلب ترتيب البيانات في عمود أو صف باستخدام الصيغ
يمكن أن تساعدك الصيغ التالية في قلب ترتيب البيانات في عمود أو صف، يرجى اتباع ما يلي:
قلب ترتيب البيانات في عمود
يرجى إدخال أو نسخ الصيغة التالية في خلية فارغة حيث تريد وضع النتيجة، ثم اسحب مقبض التعبئة لأسفل للخلايا لإرجاع القيم بترتيب عكسي، انظر الصورة:
=OFFSET($A$10,-(ROW(A1)-1),0)
ملاحظة: في الصيغة أعلاه، A1 هي أول خلية وA10 هي آخر خلية في العمود.
قلب ترتيب البيانات في صف
طبق الصيغة أدناه لقلب ترتيب البيانات أفقيًا في صف:
=OFFSET($A$1,,COUNTA(1:1)-COLUMN(A1),)
ملاحظة: في الصيغة أعلاه، A1 هي أول خلية في الصف، و1:1 هو رقم الصف الذي توجد فيه بياناتك. إذا كانت البيانات في الصف10، يجب تغييره إلى10:10.
ثم اسحب مقبض التعبئة إلى اليمين حتى يتم استخراج جميع القيم، وستحصل على جميع البيانات معكوسة أفقيًا، انظر الصورة:
عكس / قلب ترتيب البيانات في أعمدة أو صفوف متعددة باستخدام كود VBA
تعمل الصيغ أعلاه بشكل جيد مع عمود أو صف واحد فقط، إذا كان لديك عدة أعمدة أو صفوف تريد عكسها، يمكن أن تساعدك الأكواد VBA التالية.
قلب ترتيب البيانات في نطاق خلايا رأسيًا
1. أولاً، يجب عليك عمل نسخة احتياطية من بياناتك الأصلية، ثم اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر على Insert > Module، والصق الكود التالي في نافذة Module.
كود VBA: قلب نطاق خلايا بترتيب عكسي رأسيًا
Sub Flipvertically()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For j = 1 To UBound(Arr, 2)
k = UBound(Arr, 1)
For i = 1 To UBound(Arr, 1) / 2
xTemp = Arr(i, j)
Arr(i, j) = Arr(k, j)
Arr(k, j) = xTemp
k = k - 1
Next
Next
WorkRng.Formula = Arr
End Sub
3. ثم اضغط على مفتاح F5 لتشغيل الكود، وستظهر نافذة منبثقة تطلب منك تحديد نطاق البيانات الذي تريد عكسه رأسيًا، انظر الصورة:
4. بعد ذلك، انقر على زر OK، وسيتم عكس نطاق البيانات رأسيًا كما هو موضح في الصور أدناه:
قلب ترتيب البيانات في نطاق خلايا أفقيًا
لعكس نطاق البيانات أفقيًا، يرجى تطبيق كود VBA أدناه:
كود VBA: قلب نطاق خلايا بترتيب عكسي رأسيًا
Sub Fliphorizontally()
'updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim Arr As Variant
Dim i As Integer, j As Integer, k As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Arr = WorkRng.Formula
For i = 1 To UBound(Arr, 1)
k = UBound(Arr, 2)
For j = 1 To UBound(Arr, 2) / 2
xTemp = Arr(i, j)
Arr(i, j) = Arr(i, k)
Arr(i, k) = xTemp
k = k - 1
Next
Next
WorkRng.Formula = Arr
End Sub
بعد تشغيل هذا الكود، سيتم عكس البيانات في الصفوف أفقيًا، انظر الصور:
عكس / قلب ترتيب البيانات في الأعمدة أو الصفوف بنقرة واحدة فقط
إذا كان لديك Kutools لـ Excel، يمكنك باستخدام ميزتي Flip Vertical Range وFlip Horizontal Range عكس نطاق الخلايا رأسيًا أو أفقيًا بنقرة واحدة فقط.
قلب ترتيب البيانات في نطاق خلايا رأسيًا
1. حدد نطاق البيانات الذي تريد عكسه، ثم انقر على Kutools > Range > Flip Vertical Range > All / Only flip values، انظر الصورة:
نصيحة: إذا اخترت خيار All، سيتم عكس جميع تنسيقات الخلايا في نفس الوقت؛ إذا اخترت Only flip values، سيتم عكس القيم فقط.
2. بعد ذلك، سيتم عكس نطاق البيانات رأسيًا مباشرة.
قلب ترتيب البيانات في نطاق خلايا أفقيًا
1. حدد نطاق البيانات، ثم انقر على Kutools > Range > Flip Horizontal Range > All / Only flip values، انظر الصورة:
نصيحة: إذا اخترت خيار All، سيتم عكس جميع تنسيقات الخلايا في نفس الوقت؛ إذا اخترت Only flip values، سيتم عكس القيم فقط.
2. بعد ذلك، سيتم عكس جميع القيم في التحديد أفقيًا مباشرة كما هو موضح في الصور أدناه:
5.3 فرز علامات تبويب الورقة ترتيبًا أبجديًا أو حسب لون التبويب في Excel
افترض أن لديك عددًا كبيرًا من الأوراق في المصنف، وإذا كنت بحاجة إلى فرز علامات تبويب الورقة ترتيبًا أبجديًا أو حسب لون التبويب، فإن الطريقة التقليدية - سحب وإفلات علامات التبويب - ستستغرق وقتًا طويلاً. في هذه الفقرة سأناقش بعض الحيل لترتيب علامات التبويب تصاعديًا أو تنازليًا.
فرز علامات تبويب الورقة ترتيبًا أبجديًا باستخدام كود VBA
يمكن أن يساعدك كود VBA التالي في فرز علامات تبويب الورقة أبجديًا تصاعديًا أو تنازليًا، يرجى اتباع ما يلي:
1. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر على Insert > Module، ثم الصق الماكرو التالي في نافذة Module.
VBA: فرز جميع الأوراق ترتيبًا أبجديًا
Sub SortWorkBook()
'Updateby Extendoffice
Dim xResult As VbMsgBoxResult
xTitleId = "KutoolsforExcel"
xResult = MsgBox("Click Yes to sort sheets in ascending order;" & Chr(10) & "Click No will sort in descending order", vbYesNoCancel + vbQuestion + vbDefaultButton1, xTitleId)
For i = 1 To Application.Sheets.Count
For j = 1 To Application.Sheets.Count - 1
If xResult = vbYes Then
If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then
Sheets(j).Move after:=Sheets(j + 1)
End If
ElseIf xResult = vbNo Then
If UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then
Application.Sheets(j).Move after:=Application.Sheets(j + 1)
End If
End If
Next
Next
End Sub
3. ثم اضغط على مفتاح F5 لتشغيل الماكرو، في النافذة المنبثقة التالية، انقر على Yes ليتم فرز جميع الأوراق تصاعديًا أبجديًا؛ أو انقر على No ليتم فرز جميع الأوراق تنازليًا أبجديًا حسب حاجتك.
فرز علامات تبويب الورقة ترتيبًا أبجديًا / أبجديًا رقميًا باستخدام ميزة قوية
يوفر Kutools لـ Excel ميزة قوية – ترتيب جميع الأوراق Sort Sheets، حيث يمكنك من خلالها فرز الأوراق أبجديًا أو أبجديًا رقميًا، أو فرز الأوراق حسب لون التبويب أو عكس ترتيب علامات التبويب حسب حاجتك.
Kutools لـ Excel - مزود بأكثر من 300 أدوات أساسية لبرنامج Excel. استمتع بميزات ذكاء اصطناعي مجانية بشكل دائم! قم بالتنزيل الآن!
1. افتح المصنف الذي تريد فرز علامات التبويب فيه، ثم انقر على Kutools Plus > Worksheet > Sort Sheets، انظر الصورة:
2. في مربع حوار Sort Sheets، اختر نوع الفرز الذي تحتاجه من الجزء الأيمن، مثل Alpha Sort أو Alpha Numeric Sort. انظر الصورة:
3. بعد ذلك، انقر على زر Ok، وسيتم فرز جميع الأوراق حسب نوع الفرز الذي حددته. انظر الصور:
فرز علامات تبويب الورقة بناءً على لون التبويب باستخدام كود VBA
من الشائع فرز علامات تبويب الورقة أبجديًا في Excel، ولكن هل جربت يومًا فرز علامات التبويب حسب لون التبويب؟ قد يساعدك كود VBA أدناه في حل هذه المشكلة، يرجى اتباع ما يلي:
1. اضغط باستمرار على مفاتيح ALT + F11 لفتح نافذة Microsoft Visual Basic for Applications.
2. انقر على Insert > Module، ثم الصق الماكرو التالي في نافذة Module.
VBA: فرز جميع الأوراق حسب لون التبويب
Sub SortWorkBookByColor()
'Updateby20140624
Dim xArray1() As Long
Dim xArray2() As String
Dim n As Integer
Application.ScreenUpdating = False
If Val(Application.Version) >= 10 Then
For i = 1 To Application.ActiveWorkbook.Worksheets.Count
If Application.ActiveWorkbook.Worksheets(i).Visible = -1 Then
n = n + 1
ReDim Preserve xArray1(1 To n)
ReDim Preserve xArray2(1 To n)
xArray1(n) = Application.ActiveWorkbook.Worksheets(i).Tab.Color
xArray2(n) = Application.ActiveWorkbook.Worksheets(i).Name
End If
Next
For i = 1 To n
For j = i To n
If xArray1(j) < xArray1(i) Then
temp = xArray2(i)
xArray2(i) = xArray2(j)
xArray2(j) = temp
temp = xArray1(i)
xArray1(i) = xArray1(j)
xArray1(j) = temp
End If
Next
Next
For i = n To 1 Step -1
Application.ActiveWorkbook.Worksheets(CStr(xArray2(i))).Move after:=Application.ActiveWorkbook.Worksheets(Application.ActiveWorkbook.Worksheets.Count)
Next
End If
Application.ScreenUpdating = True
End Sub
3. ثم اضغط على مفتاح F5 لتنفيذ الكود، وسيتم فرز الأوراق التي لها نفس لون التبويب معًا. انظر الصور:
فرز علامات تبويب الورقة بناءً على لون التبويب باستخدام ميزة مذهلة
باستخدام ميزة ترتيب جميع الأوراق Sort Sheets في Kutools لـ Excel، يمكنك أيضًا فرز علامات تبويب الورقة حسب اللون بسرعة وسهولة.
1. انقر على Kutools Plus > Worksheet > Sort Sheets للانتقال إلى مربع حوار Sort Sheets، وفي مربع الحوار، انقر على زر Color Sort في الجزء الأيمن، انظر الصورة:
2. بعد ذلك، انقر على زر Ok، وسيتم ترتيب الأوراق التي لها نفس لون التبويب معًا كما هو موضح في الصور أدناه:
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في Excel مع Kutools لـ Excel، واختبر الكفاءة كما لم يحدث من قبل. Kutools لـ Excel يقدم أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يقدم واجهة التبويب لـ Office، ويجعل عملك أسهل بكثير
- تمكين تحرير وقراءة المستندات عبر التبويبات في Word وExcel وPowerPoint.
- افتح وأنشئ عدة مستندات في تبويبات جديدة ضمن نفس النافذة، بدلاً من فتحها في نوافذ منفصلة.
- يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات بالماوس يومياً!