كيفية الجمع بين الصفوف المكررة وجمع القيم في إكسيل؟

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

اجمع الصفوف المكررة وجمع القيم باستخدام دالة التوحيد

اجمع بين الصفوف المكررة وجمع القيم باستخدام كود فبا

اجمع بين الصفوف المكررة وجمع القيم مع كوتولس ل إكسيل

اجمع بين الصفوف المقابلة بناءً على القيم المكررة في عمود آخر مع Kutools for Excel

اجمع الصفوف المكررة وجمع القيم باستخدام دالة التوحيد

يعتبر Consolidate أداة مفيدة لنا لدمج أوراق عمل أو صفوف متعددة في Excel ، لذلك باستخدام هذه الوظيفة ، يمكننا أيضًا تلخيص صفوف متعددة بناءً على التكرارات. يرجى اتباع الخطوات التالية:

1. انقر فوق الخلية التي تريد تحديد موقع النتيجة فيها في ورقة العمل الحالية.

2. اذهب للنقر البيانات > دمج، انظر لقطة الشاشة:

3. في دمج صندوق المحادثة:

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

4. بعد الانتهاء من الإعدادات ، انقر فوق OK، ويتم دمج التكرارات وتلخيصها. انظر لقطة الشاشة:

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

اجمع بين الصفوف المكررة وجمع القيم باستخدام كود فبا

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

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

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

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

Sub CombineRows()
'Updateby Extendoffice
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)
    Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)
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 المفتاح لتشغيل هذا الرمز ، وتحتاج إلى تحديد النطاق الذي تريد دمجه في مربع المطالبة المنبثق. انظر لقطة الشاشة:

4. ثم انقر فوق OK، تم دمج الصفوف المكررة وإضافة القيم.

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

اجمع بين الصفوف المكررة وجمع القيم مع كوتولس ل إكسيل

هنا ، أقدم أداة يدوية - كوتولس ل إكسيل بالنسبة لك ، إنه الجمع بين الصفوف المتقدمة يمكنك أيضًا تقديم خدمة بسرعة لحل هذه المشكلة.

بعد تثبيت كوتولس ل إكسيليرجى القيام بما يلي:

1. حدد النطاق الذي تحتاجه وانقر كوتولس > دمج وتقسيم > الجمع بين الصفوف المتقدمة. انظر لقطة الشاشة:

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

3. ثم حدد اسم العمود الذي تريد جمع القيم وانقر احسب الشحن > مجموع أو حسابات أخرى حسب حاجتك. انظر لقطة الشاشة:

4. انقر Ok لإغلاق مربع الحوار ، يمكنك حينئذٍ رؤية التكرارات مدمجة ويتم إضافة البيانات المقابلة في عمود آخر معًا. انظر لقطات الشاشة:

انقر هنا لمعرفة المزيد عن Advanced Combine Rows.

اجمع بين الصفوف المقابلة بناءً على القيم المكررة في عمود آخر مع Kutools for Excel

في بعض الأحيان ، تريد دمج الصفوف استنادًا إلى القيم المكررة في عمود آخر ، ملف الجمع بين الصفوف المتقدمة of كوتولس ل إكسيل يمكنك أيضًا تقديم خدمة لك ، يرجى القيام بما يلي:

1. حدد نطاق البيانات الذي تريد استخدامه ، ثم انقر فوق كوتولس > دمج وتقسيم > الجمع بين الصفوف المتقدمة لتمكين الجمع بين الصفوف المتقدمة صندوق المحادثة.

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

3. ثم انقر فوق اسم عمود آخر تريد دمج البيانات ، وانقر فوق دمج لاختيار فاصل لفصل القيم المجمعة ، انظر الصورة:

4. ثم اضغط Ok، تم دمج جميع القيم التي لها نفس الخلية في العمود A معًا ، انظر لقطات الشاشة:

اجمع بين الصفوف المكررة وجمع القيم مع كوتولس ل إكسيل

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

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

---

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

Kutools for Excel يحل معظم مشاكلك ويزيد إنتاجيتك بنسبة 80٪

• إعادة استخدام: أدخل بسرعة الصيغ المعقدة والرسوم البيانية وأي شيء استخدمته من قبل ؛ تشفير الخلايا مع كلمة السر إنشاء قائمة بريدية وإرسال رسائل البريد الإلكتروني ...
• سوبر فورميولا بار (بسهولة تحرير أسطر متعددة من النص والصيغة) ؛ تخطيط القراءة (قراءة وتحرير أعداد كبيرة من الخلايا بسهولة) ؛ لصق في النطاق المصفى
• دمج الخلايا / الصفوف / الأعمدة دون فقدان البيانات ؛ تقسيم محتوى الخلايا ؛ ادمج الصفوف / الأعمدة المكررة... منع تكرار الخلايا؛ قارن النطاقات
• حدد مكرر أو فريد صفوف حدد صفوف فارغة (جميع الخلايا فارغة) ؛ البحث الفائق والبحث الغامض في العديد من المصنفات. تحديد عشوائي ...
• نسخة طبق الأصل خلايا متعددة بدون تغيير مرجع الصيغة ؛ إنشاء المراجع تلقائيًا إلى أوراق متعددة أدخل الرموز النقطية، مربعات الاختيار والمزيد ...
• استخراج النص، إضافة نص ، إزالة حسب الموضع ، إزالة الفضاء؛ إنشاء وطباعة المجاميع الفرعية لترحيل الصفحات ؛ التحويل بين محتوى الخلايا والتعليقات
• سوبر تصفية (حفظ وتطبيق مخططات التصفية على أوراق أخرى) ؛ فرز متقدم حسب الشهر / الأسبوع / اليوم ، التكرار والمزيد ؛ مرشح خاص بواسطة bold، italic ...
• اجمع بين المصنفات وأوراق العمل؛ دمج الجداول على أساس الأعمدة الرئيسية ؛ تقسيم البيانات إلى أوراق متعددة; تحويل دفعة xls و xlsx و PDF
• أكثر من 300 ميزة قوية. يدعم Office / Excel 2007-2021 و 365. يدعم جميع اللغات. سهولة النشر في مؤسستك أو مؤسستك. الميزات الكاملة نسخة تجريبية مجانية لمدة 30 يومًا. ضمان استرداد الأموال لمدة 60 يومًا.

اقرأ أكثر... تحميل مجاني ... شراء... 

---

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

• تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
• فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
• يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!

اقرأ أكثر... تحميل مجاني ... شراء...