كيف تجمع أعمدة متعددة في قائمة واحدة في إكسيل؟
لدمج أو دمج عدة أعمدة في قائمة واحدة طويلة ، يمكنك عادةً نسخ ولصق بيانات الأعمدة واحدًا تلو الآخر في العمود المحدد. لكن ، هنا ، يمكنني تقديم بعض الحيل السريعة لحل هذه المهمة في Excel.
ادمج عدة أعمدة في قائمة واحدة باستخدام كود VBA
اجمع بين أعمدة متعددة في قائمة واحدة مع Kutools for Excel
ادمج عدة أعمدة في قائمة واحدة باستخدام كود VBA
بدون تكرار نسخ بيانات الأعمدة ولصقها ، قد يساعدك رمز VBA التالي على التعامل مع هذه المهمة بسرعة وسهولة.
1. اضغط باستمرار ALT + F11 في Excel ، ويفتح ملف ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
2. انقر إدراج > وحدة، ولصق الماكرو التالي في ملف وحدة نافذة او شباك.
كود فبا: دمج أو دمج عدة أعمدة في قائمة واحدة
Sub CombineColumns1()
'updateby Extendoffice
Dim xRng As Range
Dim i As Integer
Dim xLastRow As Integer
Dim xTxt As String
On Error Resume Next
xTxt = Application.ActiveWindow.RangeSelection.Address
Set xRng = Application.InputBox("please select the data range", "Kutools for Excel", xTxt, , , , , 8)
If xRng Is Nothing Then Exit Sub
xLastRow = xRng.Columns(1).Rows.Count + 1
For i = 2 To xRng.Columns.Count
Range(xRng.Cells(1, i), xRng.Cells(xRng.Columns(i).Rows.Count, i)).Cut
ActiveSheet.Paste Destination:=xRng.Cells(xLastRow, 1)
xLastRow = xLastRow + xRng.Columns(i).Rows.Count
Next
End Sub
3. ثم اضغط F5 مفتاح لتشغيل هذا الرمز ، وسيظهر مربع موجه لتذكيرك بتحديد نطاق البيانات الذي تريد دمجه في عمود واحد فقط ، انظر لقطة الشاشة:
4. ثم انقر فوق OK زر ، وتم دمج الأعمدة المحددة في عمود واحد فقط كما هو موضح في لقطات الشاشة التالية:
نصائح: بعد تشغيل VBA هذا ، سيتم مسح البيانات الأصلية للنطاق ، ومن الأفضل نسخها وحفظها في موقع آخر أولاً.
اجمع بين أعمدة متعددة في قائمة واحدة مع Kutools for Excel
إذا كنت قد قمت بتثبيت كوتولس ل إكسيل، في نطاق التحويل يمكن أن تساعدك الأداة المساعدة في دمج عدة أعمدة في عمود واحد أو صف واحد.
كوتولس ل إكسيل : مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود في أيام 30. |
بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:
1. حدد بيانات الأعمدة التي تريد دمجها في قائمة واحدة.
2. ثم اضغط كوتولس > الفترة (من ... إلى) > نطاق التحويل، انظر لقطة الشاشة:
3. في نطاق التحويل مربع الحوار، حدد النطاق لعمود واحد الخيار، وانقر Ok زر ، انظر لقطة الشاشة:
4. في ما يلي برزت نطاق التحويل مربع ، انقر فوق الخلية حيث تريد إخراج النتيجة ، انظر الصورة:
5. ثم اضغط OK زر ، تم دمج الأعمدة المحددة في عمود واحد في الموقع المحدد الذي تريده. انظر لقطة الشاشة:
تنزيل وتجربة مجانية كوتولس ل إكسيل الآن!
عرض توضيحي: اجمع بين أعمدة متعددة في قائمة واحدة باستخدام Kutools for Excel
أفضل أدوات إنتاجية المكتب
عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!