كيفية فرز البيانات مع الخلايا المدمجة في Excel؟
محاولة فرز البيانات في Excel التي تحتوي على خلايا مدمجة غالباً ما تؤدي إلى ظهور رسالة خطأ، كما هو موضح في لقطة الشاشة على اليسار. هذا السلوك هو نتيجة للقيود الحالية في Excel - حيث لا يدعم Excel بشكل أصلي فرز النطاقات ذات الخلايا المدمجة، نظرًا لأن النطاقات المدمجة تعطل البنية الأساسية للبيانات وتجعل من الصعب على وظيفة الفرز العمل بشكل طبيعي.
عند العمل مع أوراق العمل التي تستخدم الخلايا المدمجة لتنسيق أو تجميع البيانات، قد تحتاج إلى تنظيم أو إعادة ترتيب بياناتك. لتحقيق ذلك، يجب عليك أولاً التعامل مع تلك الخلايا المدمجة بشكل صحيح. أدناه، ستجد عدة طرق عملية للتعامل وفرز البيانات مع الخلايا المدمجة مع الحفاظ على معلوماتك.
فرز البيانات مع الخلايا المدمجة عن طريق فك جميع الخلايا أولاً
فرز البيانات مع الخلايا المدمجة باستخدام Kutools لـ Excel
فرز البيانات مع الخلايا المدمجة باستخدام أتمتة VBA (فك الدمج، الملء، الفرز، إعادة الدمج)
فرز البيانات مع الخلايا المدمجة عن طريق فك جميع الخلايا أولاً
بسبب أن وظيفة الفرز الافتراضية في Excel لا يمكنها العمل على النطاقات ذات الخلايا المدمجة، فإن الخطوة اللازمة هي فك جميع الخلايا المدمجة داخل قائمة البيانات الخاصة بك أولاً. بمجرد فكها، ستظهر فراغات حيث كانت الخلايا المدمجة، لذلك ستحتاج إلى ملء هذه الخلايا الفارغة للحفاظ على الفرز بدقة. إليك الطريقة خطوة بخطوة:
1. حدد القائمة الكاملة أو الجدول الذي يحتوي على الخلايا المدمجة التي تريد فرزها. بعد تحديد البيانات، انقر فوق الصفحة الرئيسية > دمج والتوسيط لفك جميع الخلايا المدمجة. الرجاء الرجوع إلى لقطة الشاشة أدناه للحصول على إرشادات مرئية:
2. بعد فك الدمج، ستلاحظ أن المناطق المدمجة سابقاً أصبحت الآن خلايا فارغة. بينما لا تزال الخلايا المدمجة محددة، انتقل إلى علامة التبويب الصفحة الرئيسية وانقر على العثور واختيار > الانتقال إلى خاص. تضمن هذه الخطوة اختيار جميع الخلايا الفارغة داخل النطاق بكميات كبيرة بكفاءة، مما يجعل الخطوة التالية أسرع بكثير.
3. في نافذة الانتقال إلى خاص، اختر الخيار فراغات واضغط موافق. سيقوم هذا بإبراز جميع الخلايا الفارغة في النطاق المحدد على الفور.
4. ومع استمرار تسليط الضوء على الفراغات، انتقل إلى شريط الصيغة واكتب رمز =، ثم حدد الخلية مباشرة فوق الخلية الفارغة الأولى لإنشاء صيغة مرجعية (على سبيل المثال، إذا كانت C3 فارغة، أدخل =C2). بدلاً من الضغط على Enter فقط، اضغط باستمرار على Ctrl واضغط على Enter لملء جميع الفراغات المحددة بقيم الخلية الموجودة أعلاها مرة واحدة.
بعد هذه الخطوة، يتم تعبئة كل منطقة كانت مدمجة سابقاً بقيمتها الأصلية، مما يضمن سلامة بياناتك أثناء الفرز.
5. الآن أنت جاهز لفرز بياناتك كالمعتاد — حدد أي عمود، انتقل إلى علامة التبويب البيانات، واختر الفرز من A إلى Z أو الفرز من Z إلى A. إذا كنت ترغب في استعادة تنسيق الدمج بعد الفرز، يمكنك إعادة دمج القيم المتطابقة يدويًا، ولكن كن حذرًا لتجنب الدمج عبر بيانات غير متعلقة.
نصيحة: قبل المتابعة، قم دائمًا بعمل نسخة احتياطية من بياناتك الأصلية إذا كان الحفاظ على تنسيق الدمج مهمًا. أيضًا كن على دراية بأنه بعد فك الدمج وملء الفراغات، ستكون هناك صيغ موجودة. إذا كنت ترغب في تحويل الصيغ إلى قيم، حدد النطاق، انسخ، ثم ألصق كقيم لتجنب تحديثات الصيغ غير المرغوب فيها بعد الفرز.
فرز البيانات مع الخلايا المدمجة باستخدام Kutools لـ Excel
يوفر Kutools لـ Excel حلاً أكثر سهولة وكفاءة لفرز البيانات مع الخلايا المدمجة، مما يجعل العملية أكثر موثوقية عند التعامل مع مجموعات بيانات كبيرة أو متطلبات تنسيق متكررة. يمكن للأداة فك الخلية وملء القيمة في Kutools لـ Excel فك الخلايا تلقائيًا وملء الفراغات الناتجة بالقيمة المدمجة الأصلية، مما يلغي الحاجة إلى التدخل اليدوي ويحسن الكفاءة بشكل كبير.
1. قم بتحديد النطاق الذي يحتوي على الخلايا المدمجة التي تريد فرزها. بعد ذلك، انتقل إلى Kutools > دمج وتقسيم > فك الخلية وملء القيمة. راجع لقطة الشاشة التالية للحصول على الإرشادات:
عند تنفيذ هذه العملية، يتم فك جميع الخلايا المدمجة داخل النطاق المحدد على الفور، وتُملأ الخلايا الفارغة الجديدة بالقيمة المقابلة من الخلية المدمجة سابقًا، مما يضمن التناسق في جميع أنحاء الجدول.
2. الآن يمكنك فرز بياناتك كالمعتاد. بعد الفرز، وللحصول على مظهر متسق أو لأغراض عرض البيانات، يوفر Kutools أيضًا طريقة سريعة لإعادة دمج الخلايا التي تحتوي على نفس المحتوى. ببساطة حدد النطاق المُرتب، ثم انتقل إلى Kutools > دمج وتقسيم > دمج الخلايا المتطابقة لتطبيق تنسيق الدمج بكفاءة فقط حيث تكون القيم متطابقة.
إذا كنت ترغب في الحصول على نسخة تجريبية مجانية (30 يوم) من هذه الأداة، يرجى النقر لتنزيلها، ثم الانتقال لتطبيق العملية وفقًا للخطوات المذكورة أعلاه.
المزايا: هذه الطريقة تقلل من الخطوات اليدوية، وتقلل من احتمالية الأخطاء، وهي مناسبة بشكل خاص عند العمل مع جداول معقدة أو احتياجات تقارير منتظمة. تأكد دائمًا من مراجعة الناتج المدمج بعد الفرز للتحقق من أن الدمج لا يستثني أي علاقات بيانات مهمة.
فرز البيانات مع الخلايا المدمجة باستخدام Kutools لـ Excel
فرز البيانات مع الخلايا المدمجة باستخدام أتمتة VBA (فك الدمج، الملء، الفرز، وإعادة الدمج)
بالنسبة للمستخدمين المألوفين بالوحدات البرمجية، يمكن أن يؤدي أتمتة العملية عبر VBA إلى تبسيط التعامل مع الخلايا المدمجة - خاصة مع مهام الفرز المتكررة أو على نطاق واسع. يمكن لهذه الطريقة أن تعمل بكفاءة على:
- فك جميع الخلايا المدمجة في النطاق المحدد
- ملء الخلايا الفارغة الناتجة بالقيمة من الأعلى لتحقيق الاتساق
- فرز البيانات بواسطة أي عمود محدد
- اختياريًا، إعادة دمج القيم المتطابقة المتتالية في البيانات المصنفة
هذه الطريقة مرنة لتخصيص سير العمل لكنها تتطلب تمكين الوحدات البرمجية والتشغيل بعناية لتجنب فقدان البيانات. إذا كنت جديدًا على VBA، ففكر في الاختبار على ورقة عينة أولاً.
خطوات التشغيل:
1. على الشريط، انقر فوق المطور > Visual Basic لفتح نافذة Visual Basic for Applications، ثم انقر فوق إدراج > وحدة. انسخ والصق الكود التالي في نافذة الوحدة:
Sub SortDataWithMergedCells()
Dim ws As Worksheet
Dim rng As Range, cell As Range
Dim lastRow As Long, lastCol As Long
Dim sortCol As Variant
Dim reMerge As VbMsgBoxResult
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set ws = ActiveSheet
Set rng = Application.InputBox("Select the data range to sort", xTitleId, Selection.Address, Type:=8)
If rng Is Nothing Then Exit Sub
' Store dimensions
lastRow = rng.Rows.Count + rng.Row - 1
lastCol = rng.Columns.Count + rng.Column - 1
' Unmerge and fill down values
rng.UnMerge
For Each cell In rng
If IsEmpty(cell.Value) Then
cell.Value = cell.Offset(-1, 0).Value
End If
Next cell
' Ask for sort column
sortCol = Application.InputBox("Enter column number in your selection to sort by (e.g. 1 for first column)", xTitleId, 1, Type:=1)
If sortCol = False Then Exit Sub
' Sort the range
rng.Sort Key1:=rng.Cells(1, sortCol), Order1:=xlAscending, Header:=xlNo
' Ask if user wants to re-merge identical consecutive values
reMerge = MsgBox("Do you want to re-merge identical consecutive values in the sorted range (column " & sortCol & ")?", vbYesNo + vbQuestion, xTitleId)
If reMerge = vbYes Then
Dim startCell As Range, endCell As Range
Dim currVal As Variant
Dim i As Long
Set startCell = rng.Cells(1, sortCol)
currVal = startCell.Value
Set endCell = startCell
For i = 2 To rng.Rows.Count
If rng.Cells(i, sortCol).Value = currVal Then
Set endCell = rng.Cells(i, sortCol)
Else
If startCell.Address <> endCell.Address Then
ws.Range(startCell, endCell).Merge
End If
Set startCell = rng.Cells(i, sortCol)
currVal = startCell.Value
Set endCell = startCell
End If
Next i
' Final group
If startCell.Address <> endCell.Address Then
ws.Range(startCell, endCell).Merge
End If
End If
On Error GoTo 0
End Sub2. لتشغيل الوحدة البرمجية، انقر فوق 
تشغيل الزر في محرر VBA. سيتم مطالبتك بتحديد نطاق البيانات ورقم عمود الفرز. أكد كل موجه ودع الوحدة البرمجية تقوم بتنفيذ جميع الخطوات. إذا اخترت إعادة الدمج، سيقوم الكود تلقائيًا بدمج الخلايا المجاورة ذات القيمة نفسها في العمود المحدد.
نصائح:
- قم دائمًا بعمل نسخة احتياطية من ورقة العمل الخاصة بك قبل تشغيل وحدات VBA، حيث إن الإجراءات مثل فك الدمج/الدمج لا يمكن التراجع عنها.
- قد يتطلب الفرز حسب العنوان أو الأعمدة غير الرقمية ضبطات إضافية — تأكد من تحديد رقم العمود الصحيح كما هو موضح في اختيارك.
- إذا واجهت أخطاء بعد الفرز، تحقق من إشارات الصف بأكمله أو العمود، وقم بتعديل معلمات الوحدة البرمجية حسب الحاجة لتصميم بياناتك المحدد.
المزايا: تؤتمت مهمة متعددة الخطوات وغيرها متكررة - مفيدة بشكل خاص للأعمال المتكررة.
القيود: تتطلب وحدات VBA تمكين الوحدات البرمجية (تحذير أمان محتمل)، وقد تحتاج تصاميم الجداول المعقدة إلى مراجعة يدوية بعد استعادة الدمج.
للحصول على أفضل النتائج، اختبر هذه الوحدة البرمجية على نسخة مكررة من بياناتك أولاً. حل VBA هذا مفيد بشكل خاص للمستخدمين الذين يحتاجون بشكل متكرر إلى تكرار عملية الفرز والدمج أو يعملون مع صادرات بيانات ديناميكية.
أفضل أدوات الإنتاجية لمكتب العمل
عزز مهاراتك في 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد