كيف يمكن تحويل الأعمدة والصفوف إلى عمود واحد؟
عند استخدامك لورقة عمل Excel، قد تواجه أحيانًا هذا التحدي: كيف يمكنك تحويل نطاق من البيانات أو تبديله ليصبح عمودًا واحدًا؟ (راجع لقطات الشاشة التالية.) الآن، سأعرض لك ثلاث طرق سريعة وفعّالة لحل هذه المشكلة.
 |  |  |
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام صيغة
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام Kutools لـ Excel 
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام كود VBA
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام صيغة
يمكن للصيغة الطويلة التالية مساعدتك على تبديل نطاق من البيانات بسرعة إلى عمود واحد، يُرجى اتباع الخطوات التالية:
1. أولًا، عيّن اسمًا لنطاق البيانات الخاص بك. حدد النطاق الذي تريد تحويله، ثم انقر بزر الماوس الأيمن واخترتعريف اسممن القائمة السياقية. في مربع حواراسم جديد، أدخل الاسم الذي تريده، ثم انقر علىموافق. راجع لقطة الشاشة:
2. بعد تحديد اسم الخلية، انقر على خلية فارغة. في هذا المثال، سأنقر على الخلية E1، ثم أدخل الصيغة التالية:=INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1).
ملاحظة: MyData هو اسم الخلية المُخصَّص لتحديد البيانات، ويمكنك تغييره حسب احتياجاتك.
3. بعد ذلك، اسحب الصيغة لأسفل حتى تظهر رسالة خطأ. عندئذٍ، تكون جميع البيانات في النطاق قد تم دمجها في عمود واحد. راجع لقطة الشاشة:
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام Kutools لـ Excel
قد تكون الصيغة طويلة جدًّا ويصعب تذكّرها، وقد تجد أن أكواد VBA محدودة بالنسبة لك. لا داعي للقلق في هذه الحالة! سأعرّفك على أداة أسهل وأكثر تنوعًا—Kutools لـ Excel، التي توفّر لك أداةTransform Range لحل هذه المشكلة بسرعة وسهولة.
بعدتثبيت الإصدار المجانيمن Kutools لـ Excel، يُرجى اتباع الخطوات التالية:
1. حدد النطاق الذي ترغب في تبديله.
2. انقر علىKutools > Transform Range، راجع لقطة الشاشة:
3. في مربع حوارTransform Range، اختر الخيارRange to single column. راجع لقطة الشاشة:
4. ثم انقر علىموافق، وحدد خلية واحدة لوضع النتيجة من مربع الحوار المنبثق.
5. انقر علىموافق، وسيتم تحويل بيانات الأعمدة والصفوف المتعددة إلى عمود واحد.
إذا كنت ترغب في تحويل عمود واحد إلى نطاق باستخدام قيمة ثابتة، يمكنك أيضًا استخدام وظيفةTransform Range للقيام بذلك بسرعة.
تحويل/تبديل الأعمدة والصفوف إلى عمود واحد باستخدام كود VBA
باستخدام كود VBA التالي، يمكنك دمج أعمدة وصفوف متعددة في عمود واحد بسهولة.
1. اضغط مع الاستمرار على مفتاحَيALT + F11 لفتح نافذةمايكروسوفت فيجوال بيسك للتطبيقات.
2. انقر علىإدراج > وحدة نمطية، ثم الصق الكود التالي في نافذةالوحدة النمطية.
Sub ConvertRangeToColumn()
'Updateby20131126
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
Rng.Copy
Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub3. اضغط على مفتاحF5 لتشغيل الكود، وسيظهر مربع حوار يطلب منك تحديد نطاق للتحويل. راجع لقطة الشاشة:
4. ثم انقر علىموافق، وسيظهر مربع حوار آخر يطلب منك تحديد خلية واحدة لوضع النتيجة فيها، كما في لقطة الشاشة التالية:
5. ثم انقر علىموافق، وستُحوَّل محتويات الخلايا في النطاق إلى قائمة في عمود واحد. راجع لقطة الشاشة:
مقالات ذات صلة:
كيف يمكن تغيير الصف إلى عمود في 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 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
- أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل