كيفية تحويل جدول النمط المصفوفي إلى ثلاثة أعمدة في Excel؟

لنفترض أن لديك جدولًا بنمط مصفوفة يحتوي على عناوين الأعمدة وعناوين الصفوف، والآن ترغب في تحويل هذا الجدول إلى جدول بثلاثة أعمدة، ويُطلق عليه أيضًا جدول القائمة كما هو موضح في لقطة الشاشة التالية. هل لديك أي طرق جيدة لحل هذه المشكلة في Excel؟

تحويل جدول النمط المصفوفي إلى قائمة باستخدام جدول محوري

تحويل جدول النمط المصفوفي إلى قائمة باستخدام كود VBA

تحويل جدول النمط المصفوفي إلى قائمة باستخدام Kutools لـ Excel

تحويل جدول النمط المصفوفي إلى قائمة باستخدام جدول محوري

في Excel، لا يوجد ميزة مباشرة لتحويل جدول النمط المصفوفي إلى جدول بثلاثة أعمدة، ولكن إذا كنت معتادًا على استخدام الجدول المحوري، فقد يساعدك ذلك. الرجاء اتباع الخطوات التالية:

1. قم بتفعيل ورقة العمل التي تريد استخدامها، ثم اضغط مع الاستمرار على Alt + D، وبعد ذلك اضغط على P في لوحة المفاتيح. في نافذة PivotTable and PivotChart Wizard المنبثقة، حدد Multiple consolidation ranges تحت قسم Where is the data that you want to analyze، ثم اختر PivotTable تحت قسم What kind of report do you want to create، انظر لقطة الشاشة:

2. بعد ذلك، انقر على زر Next، في الخطوة Step 2a of 3 من المعالج، حدد الخيار I will create the page fields، انظر لقطة الشاشة:

3. استمر بالنقر Next الزر، في Step 2b of 3 المعالج، انقر  الزر لتحديد نطاق البيانات الذي تريد تحويله، وبعد ذلك انقر إضافة الزر لإضافة نطاق البيانات إلى كل النطاقات مربع القائمة، انظر لقطة الشاشة:

4. وانقر على زر Next، في الخطوة Step 3 of 3 من المعالج، حدد موقعًا للجدول المحوري حسب رغبتك.

5. بعد ذلك، انقر على زر إنهاء Finish، وسيتم إنشاء جدول محوري فورًا، انظر لقطة الشاشة:

6. في الجدول المحوري، انقر نقراً مزدوجاً على الخلية المتقاطعة لـ Grand Total، في هذه الحالة، سأنقر نقراً مزدوجاً على الخلية F22، وسيتم إنشاء جدول بثلاثة أعمدة كما هو موضح في لقطة الشاشة التالية:

7. وأخيرًا، يمكنك تحويل تنسيق الجدول إلى النطاق العادي عن طريق تحديد الجدول واختيار Table > Convert to Range من قائمة السياق، انظر لقطة الشاشة:

تحويل جدول النمط المصفوفي إلى قائمة باستخدام كود VBA

إذا لم تعجبك الطريقة الأولى، فإن الكود التالي VBA يمكن أن يساعدك أيضًا.

1. اضغط على Alt + F11 لعرض نافذة Microsoft Visual Basic for Applications.

2. في النافذة، انقر على Insert > Module لعرض نافذة وحدة جديدة، ثم انسخ والصق الكود التالي VBA في نافذة الوحدة.

Sub ConvertTable()
'Update 20150512
Dim Rng As Range
Dim cRng As Range
Dim rRng As Range
Dim xOutRng As Range
xTitleId = "KutoolsforExcel"
Set cRng = Application.InputBox("Select your Column labels", xTitleId, Type:=8)
Set rRng = Application.InputBox("Select Your Row Labels", xTitleId, Type:=8)
Set Rng = Application.InputBox("Select your data", xTitleId, Type:=8)
Set outRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set xWs = Rng.Worksheet
k = 1
xColumns = rRng.Column
xRow = cRng.Row
For i = Rng.Rows(1).Row To Rng.Rows(1).Row + Rng.Rows.Count - 1
    For j = Rng.Columns(1).Column To Rng.Columns(1).Column + Rng.Columns.Count - 1
        outRng.Cells(k, 1) = xWs.Cells(i, xColumns)
        outRng.Cells(k, 2) = xWs.Cells(xRow, j)
        outRng.Cells(k, 3) = xWs.Cells(i, j)
        k = k + 1
    Next j
Next i
End Sub

3. بعد ذلك، اضغط على مفتاح F5 لتشغيل هذا الكود، وستظهر نافذة منبثقة لتتيح لك تحديد تسميات الأعمدة للبيانات، انظر لقطة الشاشة:

4. وبعد ذلك انقر على زر OK، في النافذة المنبثقة التالية، حدد تسميات الصفوف، انظر لقطة الشاشة:

5. استمر بالنقر على OK، ثم حدد نطاق البيانات باستثناء عناوين الأعمدة والصفوف في النافذة المنبثقة، انظر لقطة الشاشة:

6. وبعد ذلك انقر على OK، في هذه النافذة الحوارية، حدد خلية حيث تريد وضع النتيجة. انظر لقطة الشاشة:

7. وأخيرًا، انقر على OK، وستحصل فورًا على جدول بثلاثة أعمدة.

تحويل جدول النمط المصفوفي إلى قائمة باستخدام Kutools لـ Excel

كلا الطريقتين السابقتين قد تكونان مرهقتين بعض الشيء، هنا، سأقدم لك طريقة سهلة -- Kutools لـ Excel، باستخدام ميزته Transpose Table Dimensions، يمكنك بسرعة التحويل بين مصفوفة الخلايا وجدول القائمة.

بعد تثبيت Kutools لـ Excel، الرجاء القيام بالخطوات التالية:

1. انقر على Kutools > النطاق > Transpose Table Dimensions، انظر لقطة الشاشة:

2. في مربع الحوار Transpose Table Dimensions:

(1.) اختر Cross table to list ضمن نوع التحويل.

(2.) وبعد ذلك انقر الزر أسفل نطاق المصدر لتحديد نطاق البيانات الذي تريد تحويله.

(3.) ثم انقر الزر أسفل نطاق النتائج لتحديد خلية حيث تريد وضع النتيجة.

3. وبعد ذلك انقر على زر OK، وستحصل على النتيجة التالية التي تتضمن تنسيق الخلية الأصلية:

مع هذه الأداة، يمكنك أيضًا تحويل جدول القائمة المسطح إلى جدول ثنائي الأبعاد.

لمعرفة المزيد حول ميزة Transpose Table Dimensions.

قم بتنزيل وتثبيت النسخة التجريبية المجانية من Kutools لـ Excel الآن!

عرض توضيحي: تحويل جدول النمط المصفوفي إلى قائمة باستخدام Kutools لـ Excel