انتقل إلى المحتوى الرئيسي

كيفية دمج عدة صفوف في صف واحد بناءً على التكرارات في Excel؟

ربما ، لديك بيانات لقطة الشاشة التالية ، في عمود اسم المنتج أ ، هناك بعض العناصر المكررة ، والآن تحتاج إلى إزالة الإدخالات المكررة في العمود أ ولكن قم بدمج القيم المقابلة في العمود ب ، انظر لقطات الشاشة:

doc-advanced-comb1 -2 doc-advanced-comb2

هل لديك بعض الطرق الفعالة لحل هذه المهمة؟

ادمج عدة صفوف مكررة في واحد مع كود فبا

اجمع بين عدة صفوف مكررة في Kutools for Excel

اجمع بين صفوف مكررة متعددة وجمع / متوسط ​​القيم باستخدام Kutools for Excel


السهم الأزرق الحق فقاعةادمج عدة صفوف مكررة في واحد مع كود فبا

يمكن أن تساعدك التعليمات البرمجية لـ VBA التالية في دمج الصفوف المكررة استنادًا إلى قيمة العمود A ، ويتم تطبيق التعليمات البرمجية التالية على عمودين فقط. لذلك ، إذا كان لديك عمودان من البيانات ، فإن هذا الرمز سوف يقدم خدمة لك.

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.

كود فبا: ادمج عدة صفوف في واحد

Sub CombineRows()
'Update 20131202
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

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

doc-advanced-comb3

4. ثم انقر فوق OK، تم دمج القيم الموجودة في العمود B في سجل واحد وفصلها بمسافات.

doc-advanced-comb4

الملاحظات:

1. يمكن لهذا الرمز تدمير البيانات الأصلية ، عند استخدامه ، من الأفضل عمل نسخة احتياطية من البيانات أولاً.

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


السهم الأزرق الحق فقاعةاجمع بين عدة صفوف مكررة في Kutools for Excel

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

كوتولس ل إكسيل يتضمن أكثر من 300 أداة يدوية لبرنامج Excel. تجربة مجانية بدون قيود خلال 30 يومًا. احصل عليه الآن.

بعد تثبيت Kutools for Excel ، يرجى القيام بما يلي:

1. حدد بيانات النطاق التي تريد دمج التكرارات.

doc-advanced-comb5

2. ثم اضغط كوتولس > محول المحتوى > الجمع بين الصفوف المتقدمة. انظر لقطة الشاشة:

doc-advanced-comb6

3. في الجمع بين الصفوف المتقدمة في مربع الحوار ، حدد اسم العمود كأعمدة المفاتيح التي تريد دمج القيم بناءً عليها ، ثم انقر فوق الأعمدة الرئيسية. انظر لقطة الشاشة:

doc-advanced-comb7

4. ثم تابع النقر فوق العمود الذي تحتاجه لدمج قيمها في سجل واحد ، ثم انقر فوق الجمع بين العمليات واختر تتحد فقط مع الفاصل، واختر فاصلًا واحدًا تحتاجه لفصل القيم المجمعة عن القائمة اليمنى. انظر لقطة الشاشة:

doc-advanced-comb8

5. بعد الانتهاء من الإعدادات ، انقر فوق OK، وسيتم دمج بياناتك بناءً على الأعمدة الرئيسية ومفصولة بفواصل.

doc-advanced-comb9

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


السهم الأزرق الحق فقاعةاجمع بين صفوف مكررة متعددة وجمع / متوسط ​​القيم باستخدام Kutools for Excel

مع هذا متعدد الوظائف الجمع بين الصفوف المتقدمة يمكنك دمج صفوف مكررة وإجراء بعض العمليات الحسابية للقيم أيضًا.

1. حدد بيانات النطاق التي تريد دمج التكرارات.

2. انتقل إلى الجمع بين الصفوف المتقدمة صندوق المحادثة؛

  • (1.) حدد اسم عمود كعمود أساسي تريد حساب قيم العمود الأخرى بناءً عليه ، ثم انقر فوق الأعمدة الرئيسية;
  • (2.) حدد العمود الذي تريد القيام ببعض العمليات الحسابية للقيم ، ثم انقر فوق الجمع بين العمليات > اجمع احسب، ثم اختر نوع الحساب الذي تريده ، في هذه الحالة ، أحدد مجموع. انظر لقطة الشاشة:

doc-advanced-comb10

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

doc-advanced-comb11 -2 doc-advanced-comb12

الملاحظات:

1. إذا قمت بالتدقيق بياناتي لها رؤوس الخيار ، سيتم تجاهل رؤوس النطاق (الصف الأول) عند تطبيق هذه الأداة المساعدة.

2. استخدم القيم المنسقة: سيحتفظ بتنسيق القيم بعد دمج الخلايا المكررة.

3. هذه الأداة غير متاحة لتصفية البيانات.

انقر لمعرفة المزيد حول وظيفة الصفوف المتقدمة هذه.


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

اجمع الصفوف المكررة وجمع القيم

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

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

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

الوصف


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

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have used the code above successfully in the past however today, it is deleting column B. Looks like it's just removing duplicates...not sure what the issue is.

Sample Data
Reece, Ashley G01-Registered-UWG
Reece, Chris G02-Registered-KSU
Reece, Chris G03-Dropped-KSU
Reece, Jayden G02-Registered-UNG
Reece, Jayden G02-Withdrawn-UNG
This comment was minimized by the moderator on the site
I have in column A

1 Cast
2 Crew
3 Hiring
4 Cast
5 Hiring
6 Crew

I need these unique CAST CREW AND HIRING in another column without delete in column A entries.

Ex: I need (after formula)

1 Cast
2 Crew
3 Hiring

Is it possible by formula?
This comment was minimized by the moderator on the site
Above Macro only Combine the limited cell(e.g 20 cells) in b column. How to Combine more cells
This comment was minimized by the moderator on the site
Same - 2021 and this still only works if you have like 20 rows...
This comment was minimized by the moderator on the site
I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?
This comment was minimized by the moderator on the site
Same here. I was about to purchase because the tools are very nice, but figured I would try it first. Combine never works. I tried it for about 3 weeks now and it always locks up. No matter the power of my computer (ran on my at home powerhouse computer, same issue)
I kept cutting down to less and less data to see if it would work but it still would not.
The last one I tried was 4 columns and 100k rows and it still locked up. Not very useful unless you have like < 100 rows or something.
This comment was minimized by the moderator on the site
Same here, I filtered my data all the way down to 4 columns and 100k rows and it still work not work. I have tried this for 3 weeks now and unable to successfully complete my task. Kutools will only work if you have very few rows.
This comment was minimized by the moderator on the site
[quote]I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?By David Greene[/quote] Sorry, we will fix it in next version.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations