كيفية تقسيم محتوى الخلية إلى عدة صفوف في Excel (سيناريوهات + مقارنة أدوات)

نصيحة: يمكنك تغيير الفاصلة "," إلى ";" أو "|" حسب كيفية فصل البيانات لديك.

الخطوة 2. اضغط على مفتاح Enter.

الطريقة الثالثة: Power Query – تقسيم وتوسيع الصفوف (Microsoft 2016 والإصدارات الأحدث)

Power Query مثالي للعمليات المنظمة والتكرارية. إنه قوي، محدث وجيد لتحويلات البيانات الضخمة.

تناسب: كلا من السيناريو الأول (تقسيم الخلية المستهدفة فقط) والسيناريو الثاني (تقسيم الخلية والاحتفاظ ببيانات الأعمدة الأخرى)

الخطوات: استخدم السيناريو الأول (تقسيم الخلية المستهدفة فقط) كمثال

الخطوة 1. حدد نطاقك، انتقل إلى البيانات > الحصول والتحويل > من الجدول/النطاق.

an 

الخطوة 2. في إنشاء الجدول، انقر موافق. (إذا كان النطاق المحدد يحتوي على رؤوس، اختر جدولي يحتوي على رؤوس.)

الخطوة 3. في محرر Power Query، استخدم تقسيم العمود حسب الفاصل.

الخطوة 4. اختر أو أدخل الفاصل، ثم انقر على خيارات متقدمة لتوسيع الخيارات، اختر تقسيم إلى صفوف، ثم انقر موافق.

الخطوة 5. اختر إغلاق & تحميل > إغلاق & تحميل أو إغلاق & تحميل إلى.

نفس الخطوات تنطبق على السيناريو الثاني (تقسيم الخلايا مع الحفاظ على بيانات الأعمدة الأخرى) - لنلقِ نظرة على النتائج.

النطاق المستهدف للخلايا:

النتيجة:

ملاحظة: في نافذة محرر Power Query، حدد فقط العمود المستهدف الذي تريد تقسيمه إلى صفوف، ثم انقر على حسب الفاصل تحت تقسيم العمود.

نصيحة: أضف خطوات Trim و Clean لإصلاح المسافات البيضاء أو الأحرف الخاصة.

الطريقة الرابعة: أداة Kutools Plugin – النقر لتقسيم

إذا كنت تقوم بتقسيم الخلايا بشكل متكرر وتفضل حلًا يعتمد على واجهة رسومية، فإن Kutools هي أداة ممتازة. تقوم بتبسيط العمليات المعقدة إلى بضع نقرات فقط.

تناسب: كلا من السيناريو الأول (تقسيم الخلية المستهدفة فقط) والسيناريو الثاني (تقسيم الخلية والاحتفاظ ببيانات الأعمدة الأخرى)

الخطوات: السيناريو الأول (تقسيم الخلية المستهدفة فقط)

الخطوة 1. حدد الخلية المستهدفة.

الخطوة 2. اذهب إلى Kutools > دمج & تقسيم > تقسيم الخلايا.

الخطوة 3. اختر تقسيم إلى صفوف وحدد الفاصل. انقر موافق./p>

الخطوة 4. حدد الخلية الهدف. انقر موافق.

الخطوات: السيناريو الثاني (تقسيم الخلية والاحتفاظ ببيانات الأعمدة الأخرى)

الخطوة 1. حدد العمود الذي تريد تقسيمه إلى صفوف.

الخطوة 2. اذهب إلى Kutools > دمج & تقسيم > تقسيم البيانات إلى صفوف.

الخطوة 3. حدد الفاصل. انقر موافق.

نفس الخطوات تنطبق على السيناريو الثاني (تقسيم الخلايا مع الحفاظ على بيانات الأعمدة الأخرى) - لنلقِ نظرة على النتائج.

النطاق المستهدف للخلايا:

النتيجة:

ملاحظة: توفر النسخة التجريبية لمدة 30 يومًا جميع الوظائف للاختبار.

الطريقة الخامسة: برنامج VBA – التحكم الكامل المخصص

بالنسبة للمستخدمين الذين لديهم معرفة برمجية، يوفر VBA مرونة لا نهاية لها. يمكنك تخصيص البرامج النصية لتتناسب مع ترتيب بياناتك الدقيق وقواعد عملك.

تناسب: كلا من السيناريو الأول (تقسيم الخلية المستهدفة فقط) والسيناريو الثاني (تقسيم الخلية والاحتفاظ ببيانات الأعمدة الأخرى)

الخطوات:

الخطوة 1. اضغط على Alt + F11 لفتح محرر VBA.

الخطوة 2. انقر على إدراج > وحدة.

الخطوة 3. انسخ والصق الكود البرمجي VBA أدناه.

السيناريو الأول تقسيم الخلية المستهدفة فقط

'Update by Extendoffice
Sub SplitCellToRows_Simple()
    Dim InputCell As Range
    Dim Values As Variant
    Dim i As Long

  
    Set InputCell = Range("A1") ' change A1 to your target cell

    Values = Split(InputCell.Value, ",") 
    For i = 0 To UBound(Values)
        InputCell.Offset(i, 1).Value = Trim(Values(i))
    Next i
End Sub

السيناريو الثاني تقسيم الخلية والاحتفاظ ببيانات الأعمدة الأخرى

'Update by Extendoffice
Sub SplitRowsWithOtherColumns()
    Dim ws As Worksheet
    Dim LastRow As Long, i As Long
    Dim arr As Variant, j As Long
    Dim SplitVals As Variant
    Dim CurrentRow As Long

    Set ws = ActiveSheet
    LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    For i = LastRow To 2 Step -1
        If InStr(ws.Cells(i, 2).Value, ",") > 0 Then
            SplitVals = Split(ws.Cells(i, 2).Value, ",")

            For j = UBound(SplitVals) To 1 Step -1
                ws.Rows(i + 1).Insert Shift:=xlDown
                ws.Cells(i + 1, 1).Value = ws.Cells(i, 1).Value
                ws.Cells(i + 1, 2).Value = Trim(SplitVals(j))
            Next j

            ws.Cells(i, 2).Value = Trim(SplitVals(0))
        End If
    Next i
End Sub

ملاحظة: تم تكوين هذا البرنامج النصي VBA للعمل بشكل خاص عندما تكون بياناتك موجودة في الأعمدة من A إلى B والقيم المراد تقسيمها في العمود B.

💡نصائح:

• قم دائمًا بعمل نسخة احتياطية لبياناتك قبل تشغيل الماكرو.
• استبدل "," في البرنامج النصي بالفاصل الفعلي الخاص بك (مثل ";" للفاصلة المنقوطة أو "|" للشخصيات الشرطة) لمطابقة تنسيق بياناتك.

القضايا الشائعة

• صفوف أو أعمدة فارغة: عادة ما تكون ناتجة عن الفواصل الزائدة أو المسافات المخفية.
• أخطاء الخلايا المدمجة: قم بإلغاء دمج الخلايا قبل البدء.
• Power Query لا يقوم بالتحديث: تذكر النقر على تحديث بعد تعديل بيانات المصدر.
• الفاصل الخاطئ: يمكن أن يؤدي خطأ الفاصلة المنقوطة مقابل الفاصلة إلى إفساد النتائج بأكملها.

مقالات ذات صلة:

• أداة Transpose Range: قم بسهولة بتحويل عدة صفوف إلى أعمدة وصفوف في Excel
• أداة Unit Converter: قم بتحويل الأعداد العشرية إلى أرقام ثنائية/ثماني/سداسي عشري والعكس بسرعة

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

🤖	Kutools AI Aide: أحدث ثورة في تحليل البيانات اعتمادًا على: التنفيذ الذكي |  توليد الأكواد |  إنشاء الصيغ المخصصة |  تحليل البيانات وتوليد الرسوم البيانية |  استخدام Kutools Functions...
	ميزات شائعة: البحث، تمييز أو وضع علامة على المكررات | حذف الصفوف الفارغة | دمج الأعمدة أو الخلايا بدون فقدان البيانات | تقريب بدون الصيغة...
	بحث متقدم: بحث بمعايير متعددة VLookup | بحث بقيم متعددة VLookup | بحث في عدة ورقات VLookup | مطابقة غامضة...
	قائمة منسدلة متقدمة: إنشاء قائمة منسدلة بسرعة | قائمة منسدلة معتمدة | قائمة منسدلة متعددة الاختيارات...
	مدير الأعمدة: إضافة عدد محدد من الأعمدة | نقل الأعمدة | تبديل حالة إظهار الأعمدة المخفية | مقارنة النطاقات والأعمدة...
	ميزات مميزة: التركيز على الشبكة | عرض التصميم | شريط الصيغ المحسن | مدير أدوات المصنف وورقة العمل | مكتبة النص التلقائي | منتقي التاريخ | دمج البيانات | تشفير/فك تشفير الخلايا | إرسال البريد الإلكتروني حسب الجدول | مرشح متقدم | تصفية خاصة (تصفية الخلايا التي تحتوي على خط عريض/مائل/يتوسطه خط...)...
	أفضل15 مجموعة أدوات:12 أداة نصية (إضافة نص، حذف الأحرف المحددة، ...) | أكثر من50 نوع رسم بياني (مخطط جانت، ...) | أكثر من40 صيغة عملية (حساب العمر بناءً على تاريخ الميلاد، ...) |19 أداة إدراج (إدراج رمز الاستجابة السريعة، إدراج صورة من المسار، ...) |12 أداة تحويل (تحويل إلى كلمات، تحويل العملة، ...) |7 أدوات دمج وتقسيم (دمج متقدم للصفوف، تقسيم الخلايا، ...) | ... والمزيد

استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية، الإسبانية، الألمانية، الفرنسية، الصينية، وأكثر من40 لغة أخرى!

عزز مهاراتك في Excel باستخدام Kutools لـ Excel، واختبر كفاءة غير مسبوقة. Kutools لـ Excel يوفر أكثر من300 ميزة متقدمة لزيادة الإنتاجية وتوفير وقت الحفظ. انقر هنا للحصول على الميزة الأكثر أهمية بالنسبة لك...

مزيد من التفاصيل حول Kutools لـ Excel... تنزيل مجاني...

---

Office Tab يجلب واجهة التبويب إلى Office ويجعل عملك أسهل بكثير

• تفعيل تحرير وقراءة عبر التبويبات في Word، Excel، PowerPoint، Publisher، Access، Visio وProject.
• افتح وأنشئ عدة مستندات في تبويبات جديدة في نفس النافذة، بدلاً من نوافذ مستقلة.
• يزيد إنتاجيتك بنسبة50%، ويقلل مئات النقرات اليومية من الفأرة!

مزيد من التفاصيل حول Office Tab... تنزيل مجاني...

---

جميع إضافات Kutools. مثبت واحد

حزمة Kutools for Office تجمع بين إضافات Excel وWord وOutlook وPowerPoint إضافة إلى Office Tab Pro، وهي مثالية للفرق التي تعمل عبر تطبيقات Office.

• حزمة الكل في واحد — إضافات Excel وWord وOutlook وPowerPoint + Office Tab Pro
• مثبّت واحد، ترخيص واحد — إعداد في دقائق (جاهز لـ MSI)
• الأداء الأفضل معًا — إنتاجية مُبسطة عبر تطبيقات Office
• تجربة كاملة لمدة30 يومًا — بدون تسجيل، بدون بطاقة ائتمان
• قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد

مزيد من التفاصيل حول Kutools for Office... تنزيل مجاني...