كيفية تقسيم قيم الخلايا عمودياً في Excel؟
عند العمل في Excel، قد تواجه مواقف حيث تحتاج إلى تحويل قيم متعددة في صف واحد أو عدة صفوف إلى قائمة عمودية. هذا مفيد بشكل خاص عندما يتم تخزين البيانات بتنسيق أفقي ولكنها تحتاج إلى المعالجة أو التحليل بتنسيق أعمدة.
ستغطي هذه الدليل ثلاث طرق فعالة لتحويل قيم الخلية عمودياً:
تقسيم قيم الخلايا إلى صفوف عمودياً في Excel
- باستخدام صيغة (Excel 365) – الأفضل للتحولات الديناميكية والتلقائية
- باستخدام Kutools لـ Excel – حل سريع وسهل مع أداة متخصصة لجميع إصدارات Excel
- باستخدام كود VBA – مثالي لأتمتة العملية لجميع إصدارات Excel
تقسيم قيم الخلايا إلى صفوف عمودياً باستخدام صيغة (Excel 365)
إذا كنت تستخدم Excel 365، يمكنك استخدام وظائف TEXTSPLIT وTEXTJOIN وTRANSPOSE لتحويل قيم الخلايا عمودياً دون جهد يدوي.
يرجى نسخ ولصق الصيغة التالية في خلية فارغة، ثم الضغط على زر "Enter"، وسيقوم Excel تلقائياً بتوزيع البيانات على عدة صفوف، انظر إلى لقطة الشاشة:
=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))
- TEXTJOIN(";", TRUE, A1:A4 ): يقوم بدمج النصوص في الخلايا A1 إلى A4 في سلسلة واحدة، مفصولة بفاصلة منقوطة (;).
- TEXTSPLIT(...): يقوم بتقسيم السلسلة المدمجة مرة أخرى إلى قيم منفصلة باستخدام الفاصلة المنقوطة كفاصل.
- TRANSPOSE(...): يحول القائمة العمودية الناتجة من القيم إلى صف أفقي (أو العكس، حسب الاتجاه الأصلي).
✅ المزايا:
- ✔ تحديثات ديناميكية: إذا تغيرت البيانات المصدر، تقوم الصيغة تلقائياً بتحديث النتائج.
- ✔ لا حاجة لجهد يدوي: يلغي الحاجة إلى تقسيم يدوي متكرر.
- ✔ فواصل قابلة للتخصيص: استبدل الفاصلة المنقوطة (;) بأي فاصل آخر (مثل الفاصلة، المسافة) لتتناسب مع بياناتك.
❌ العيوب:
- ✘ متاح فقط في Excel 365 ولا يعمل في إصدارات Excel القديمة.
تقسيم قيم الخلايا إلى صفوف عمودياً باستخدام Kutools لـ Excel
إذا كنت تستخدم Excel 2019 أو إصداراً أقدم، يمكنك استخدام "Kutools لـ Excel" – وهو إضافة قوية تحتوي على أدوات متخصصة لإدارة البيانات بسهولة. باستخدام ميزة "تقسيم البيانات إلى صفوف"، يمكنك تحويل قيم الخلايا عمودياً بناءً على أي فاصل تحتاجه.
بعد تثبيت "Kutools لـ Excel"، يرجى القيام بما يلي:
- انقر فوق "Kutools" > "دمج وتقسيم" > "تقسيم البيانات إلى صفوف"، انظر إلى لقطة الشاشة:
- في مربع الحوار "تقسيم البيانات إلى صفوف"، حدد العمليات التالية:
- حدد الخلايا التي تريد تقسيمها؛
- في قسم "الفاصل"، حدد الفاصل الذي يحدد كيفية تقسيم محتوى الخلية. هنا، سأختار "فاصلة منقوطة".
- أخيراً، انقر فوق زر "موافق".
النتيجة: سيتم تحويل البيانات إلى عمود عمودي.
✅ المزايا:
- ✔ يعمل في جميع إصدارات Excel (2010، 2013، 2016، 2019، 2021، 365)
- ✔ لا حاجة لصيغ معقدة أو برمجة.
- ✔ يدعم مجموعة واسعة من الفواصل.
- ✔ يوفر Kutools أكثر من 300 أداة لمعالجة البيانات، مما يوفر الوقت في المهام الأخرى.
❌ العيوب:
- ✘ يتطلب تثبيت Kutools
تقسيم قيم الخلايا إلى صفوف عمودياً باستخدام كود VBA
بالنسبة للمستخدمين المتقدمين، يوفر VBA حلاً قوياً لأتمتة تقسيم قيم الخلايا عمودياً. الكود البرمجي VBA أدناه يتيح لك تقسيم محتويات الخلية إلى صفوف باستخدام أي فاصل مخصص بسهولة.
1. اضغط باستمرار على مفتاحي "ALT" + "F11" لفتح نافذة "Microsoft Visual Basic for Applications".
2. انقر فوق "إدراج" > "وحدة"، والصق الكود التالي في نافذة "الوحدة".
كود VBA: تقسيم قيم الخلايا إلى صفوف عمودياً باستخدام فاصل محدد
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. بعد ذلك، اضغط على مفتاح "F5" لتشغيل هذا الكود، وستظهر نافذة منبثقة لتذكيرك بتحديد قيم الخلايا التي تريد تقسيمها عمودياً، انظر إلى لقطة الشاشة:
4. وبعد ذلك، انقر فوق زر "موافق"، ستظهر نافذة أخرى لتذكيرك بتحديد خلية لوضع النتائج، انظر إلى لقطة الشاشة:
5. انقر فوق زر "موافق"، وستكون قيم الخلايا قد تم تقسيمها إلى قائمة باستخدام فاصل، انظر إلى لقطة الشاشة:
✅ المزايا:
- ✔ يُمكن أن يُؤتمت العملية، مما يوفر الوقت.
- ✔ يعمل في جميع إصدارات Excel.
- ✔ يمكن تخصيصه للفواصل المختلفة.
❌ العيوب:
- ✘ يتطلب معرفة أساسية ببرمجة VBA.
- ✘ معقد بعض الشيء للمبتدئين.
يمكن تحقيق تحويل قيم الخلايا عمودياً في Excel من خلال عدة طرق، لكل منها نقاط قوتها الخاصة. من خلال فهم هذه الطرق، يمكنك اختيار النهج الأفضل لاحتياجاتك الخاصة وتحسين سير عملك في Excel. سواء كنت مبتدئاً أو مستخدماً متقدماً، ستساعدك هذه الأدوات والتقنيات على التعامل مع البيانات بشكل أكثر فعالية وكفاءة. إذا كنت مهتماً باكتشاف المزيد من نصائح وحيل Excel، فإن موقعنا يقدم آلاف الدروس لمساعدتك على إتقان 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 يومًا — بدون تسجيل، بدون بطاقة ائتمان
- قيمة رائعة — وفر مقارنة بشراء الإضافات بشكل منفرد