KutoolsforOffice — حل واحد، خمس أدوات قوية.تحقيق المزيد بجهد أقل.

كيف يمكن ضغط الصفوف بسرعة وفقًا للقيمة المتماثلة في Excel؟

المؤلفسونتاريخ التعديل
لقطة شاشة تُظهر بيانات تحتوي على أسماء طلبات مكررة في Excel
عند العمل مع بيانات إكسل، من الشائع وجود صفوف تحتوي على القيم المكررة في أحد الأعمدة وبيانات رقمية مرتبطة بها تحتاج إلى دمجها أو جمعها. إذا كان لديك عمودان—عمود الطلبات الذي يحتوي على إدخالات مكررة وعمود المبيعات—فإن هدفك هو توحيد الصفوف عبر جمع قيم المبيعات لكل طلب فريد، كما هو موضح في لقطة الشاشة. ستُرشدك هذه المقالة خلال نهج محسّن لضغط الصفوف استنادًا إلى قيمة مشتركة باستخدام عدة تقنيات.

ضغط الصفوف استنادًا إلى القيمة باستخدام PivotTable
ضغط الصفوف استنادًا إلى القيمة باستخدام Kutools لـ Excel
ضغط الصفوف استنادًا إلى القيمة باستخدام الصيغ
ضغط الصفوف وجمعها باستخدام ماكرو VBA

ضغط الصفوف بناءً على القيمة باستخدام PivotTable

صُمّمت ميزة PivotTable في Excel لتلخيص البيانات بسرعة وكفاءة، خاصةً عند الحاجة إلى ضغط الصفوف بناءً على القيم المكررة في عمود واحد وتجميع البيانات الرقمية في عمود آخر. وهي الخيار الأمثل للمستخدمين الراغبين في جدول ملخص تفاعلي يوفّر خيارات متقدمة للتجميع والتصفية والتحليل. وتتميّز PivotTables بقدرتها على التعامل مع مجموعات البيانات الضخمة والتحديث التلقائي بأقل جهد ممكن.

1. حدد النطاق الكامل لبياناتك، بما في ذلك رؤوس الأعمدة، ثم انتقل إلى علامة التبويبإدراجفي الشريط العلوي. بعد ذلك، انقر علىPivotTable. ستظهر نافذة الحوار «إنشاء PivotTable»—اختر ما إذا كنت تريد وضع PivotTable فيورقة عمل جديدةأو فيورقة عمل موجودةحسب ما يناسب سير عملك، ثم انقر علىموافق. انظر لقطة الشاشة:

2. في جزء «حقول PivotTable»، اسحب الحقلالطلبإلى منطقةالصفوف، واسحب الحقلالمبيعاتإلى منطقةالقيم. سيُنشئ هذا تلقائيًا جدول ملخص يعرض كل طلب فريد مع مجموع المبيعات المقابل له.

تلميح: بشكل افتراضي، تقوم PivotTable بتجميع القيم الرقمية في العمود. إذا أردت استخدام عملية حسابية مختلفة—مثل المتوسط أو العد أو القيمة الصغرى أو العظمى—فانقر على السهم المنسدل بجانب «مجموع المبيعات» في قسم «القيم»، ثم اخترقيمة إعدادات الحقولوحدد العملية المناسبة.
لقطة شاشة لإعدادات حقل القيمة في PivotTable للحسابات الأخرى

المزايا:

  • مثالي للتحليل الديناميكي واستكشاف البيانات.
  • يتم تحديثه بسهولة عند تغيّر البيانات الأصلية.
  • يوفّر خيارات غنية تتيح لك مزيدًا من التصفية والتجميع وتعديلات التنسيق.
السلبيات:
  • يتطلب الأمر معرفةً مسبقةً بأدوات PivotTable لتحقيق التخصيص المتقدم.

ضغط الصفوف بناءً على القيمة باستخدام Kutools لـ Excel

تقدم «Kutools لـ Excel» طريقة مبسّطة لدمج صف مكرر وملخص بياناتك، مما يجعلها مفيدة بشكل خاص للمهام المتكررة أو الواسعة النطاق. وهي مناسبة جدًا للمستخدمين الذين يديرون كميات كبيرة من البيانات ويحتاجون إلى تحويل المعلومات أو تلخيصها دون عناء يدوي معقد.

ملاحظة: تقوم أدوات Kutools بتنفيذ العمليات مباشرةً على نطاق البيانات الأصلي. ولضمان أمان البيانات، احفظ نسخة احتياطية من بياناتك مسبقًا، لأن التغييرات لا يمكن التراجع عنها بسهولة بعد الدمج.
Kutools لـ Excelيقدّم أكثر من 300 ميزة متقدمة لتبسيط المهام المعقدة، مما يعزز الإبداع والكفاءة.مدمج مع إمكانات الذكاء الاصطناعي، يقوم Kutools بأتمتة المهام بدقة، مما يجعل إدارة البيانات سهلة بلا جهد.معلومات تفصيلية عن Kutools لـ Excel...         نسخة تجريبية مجانية...

1. حدّد نطاق البيانات التي ترغب في ضغطها. بعد ذلك، انتقل إلىKutools في شريط الأدوات، ثم اختردمج وتقسيم > دمج متقدم للصفوف.

2. ستظهر نافذة الحوار «دمج متقدم للصفوف». ستحتاج إلى:

  • انقر على رأس العمود الذي يحتوي على الإدخالات المكررة وعيّنه كـالمفتاح الأساسي. هذا يُخبر Excel بالقيم التي يجب استخدامها لتجميع البيانات.
  • انقر على رأس العمود الذي يحتوي على القيم الرقمية التي تريد تجميعها. من القائمة المنسدلةالعملية، اختر العملية الحسابية المناسبة ضمن قسم «حساب»—مثل المجموع أو المتوسط أو القيمة العظمى أو الصغرى—وفقًا لاحتياجاتك.
  • بعد تحديد هذه الإعدادات، انقر علىموافقلمعالجة الدمج.

3. سيتم ضغط الصفوف وتطبيق الحساب المحدد على العمود الذي اخترته.

نصائح عملية:

  • إذا كان جدول البيانات يحتوي على خلايا فارغة أو نصوص غير رقمية، فتأكد من أن عمود الحساب يتضمّن أرقامًا فقط لتجنب ظهور نتائج غير متوقعة.
  • يُوصى بشدة باستخدام Kutools، خاصةً عند التعامل مع مجموعات البيانات الكبيرة التي يكون دمجها يدويًا أمرًا مرهقًا.
المزايا:
  • سريعٌ للغاية وسهلٌ للمعالجة الدفعية.
  • يمكنك تخصيص طريقة دمج القيم المكررة واختيار الأعمدة التي سيتم تجميعها بالكامل.
السلبيات:
  • يتطلب تثبيت إضافة Kutools لـ Excel.
  • يُعدّل جدول البيانات الأصلي نطاق البيانات (يمكنك التراجع عن التعديل باستخدام Ctrl+Z إذا لم تكن قد حفظت التغييرات بعد).

Kutools لـ Excel- عزِّز Excel بقوة أكثر من 300 أداة أساسية، لتجعل عملك أسرع وأسهل، واستفد من ميزات الذكاء الاصطناعي لمعالجة البيانات بشكل أكثر ذكاءً وزيادة الإنتاجية.احصل عليه الآن

ضغط الصفوف بناءً على القيمة باستخدام الصيغ

توفر صيغ Excel طريقة مرنة لتلخيص البيانات دون الحاجة إلى إعادة هيكلة ورقة العمل. وهي مثالية للمهام المخصصة أو مجموعات البيانات الأصغر، وكذلك عندما تريد ضغط المعلومات في منطقة منفصلة مع الحفاظ على البيانات المصدرية دون أي تغيير. ويمكن لصيغ شائعة مثلSUMIF حساب المجاميع تلقائيًا لكل قيمة فريدة.

1. اختر خلية فارغة بجانب نطاق البيانات—مثلًا، الخلية D2—وأدخل الصيغة التالية. ثم اضغط على مفاتيحShift + Ctrl + Enter لحساب أول قيمة فريدة.

=INDEX($A$2:$A$12,MATCH(0,COUNTIF($D$1:D1,$A$2:$A$12),0))

ملاحظة: عدّل النطاقات في الصيغة—فـ"A2:A12" يشير إلى القائمة التي قد تحتوي على قيم مكررة، و"D1" هي الخلية الابتدائية لنتائجك. تأكد من أن مراجع الخلايا تتطابق مع ورقة العمل الفعلية الخاصة بك، واستخدم المراجع المطلقة إذا كنت تنوي نسخ الصيغة إلى خلايا أخرى.

2. حدد الخلية D2 (التي أدخلت فيها الصيغة)، ثم اسحب مقبض التعبئة لأسفل حتى نهاية قائمتك أو حتى تظهر قيمة خطأ تدل على أن جميع الإدخالات الفريدة قد تم سردها.

3. احذف جميع رسائل الخطأ التي تظهر في نهاية قائمتك، ثم انتقل إلى الخلية المجاورة في منطقة النتائج (مثل E2)، وأدخل الصيغة التالية لجمع القيم لكل إدخال. بعد ذلك، اضغط علىEnter، واسحب لأسفل لتطبيقها على الصفوف الأخرى.

=SUMIF($A$2:$A$12,D2,$B$2:$B$12)

ملاحظة: "A2:A12" هو عمود المصدر الذي تريد التحقق من وجود قيم مكررة فيه، و"D2" هي الخلية التي تحتوي على أول قيمة فريدة، و"B2:B12" هو العمود الذي يحتوي على قيم المبيعات أو القيم الرقمية. غيّر هذه المراجع حسب احتياجات مجموعة البيانات الخاصة بك.

نصائح وتحذيرات:

  • لا تغيّر الصيغ البيانات الأصلية، مما يجعلها مثالية خصوصًا لتقارير الملخصات الموضوعة جنبًا إلى جنب.
  • إذا رغبت، يمكنك استخدام دوال تجميع أخرى—مثلCOUNTIF وAVERAGEIF، وغيرها—لتلبية احتياجات تحليلك.

ضغط الصفوف وجمعها باستخدام ماكرو VBA

عند التعامل مع مجموعات بيانات ضخمة أو عند الحاجة إلى ضغط الصفوف بشكل متكرر استنادًا إلى قيم متماثلة، يُمكنك أتمتة هذه العملية باستخدام ماكرو VBA لتوفير وقتك وجهدك بشكل كبير. يمكّنك هذا الحل من معالجة مئات أو حتى آلاف الصفوف دفعة واحدة، أو دمج هذه الوظيفة بسلاسة ضمن سير عملك المخصص. يقوم كود VBA المقدَّم هنا بتجميع القيم في عمود معيّن لكل عنصر فريد موجود في عمود آخر، ثم يُخرِج النتائج المضغوطة إلى ورقة عمل جديدة — مع الحفاظ التام على بياناتك الأصلية.

1. افتح Excel، ثم اضغط على Alt+F11 للدخول إلى محررVisual Basic for Applications. في محرر VBA، انقر علىإدراج > وحدة نمطيةلإنشاء وحدة كود جديدة. انسخ والصق الكود التالي في نافذة الوحدة:

Sub CondenseAndSumRows()
    Dim srcWS As Worksheet, destWS As Worksheet
    Dim lastRow As Long, i As Long
    Dim dict As Object
    Dim keyCol As String, sumCol As String
    Dim dataRange As Range, cell As Range
    
    On Error Resume Next
    Set dict = CreateObject("Scripting.Dictionary")
    
    Set srcWS = Application.ActiveSheet
    
    ' Prompt to select the whole data range
    Set dataRange = Application.InputBox("Select full data range including headers", "KutoolsforExcel", Type:=8)
    
    keyCol = Application.InputBox("Select header name for key/duplicate column", "KutoolsforExcel", Type:=2)
    sumCol = Application.InputBox("Select header name for numeric/sum column", "KutoolsforExcel", Type:=2)
    
    If dataRange Is Nothing Or keyCol = "" Or sumCol = "" Then Exit Sub
    
    ' Get column numbers by header
    Dim keyColNum As Integer, sumColNum As Integer
    For i = 1 To dataRange.Columns.Count
        If dataRange.Cells(1, i).Value = keyCol Then
            keyColNum = i
        End If
        If dataRange.Cells(1, i).Value = sumCol Then
            sumColNum = i
        End If
    Next i
    
    If keyColNum = 0 Or sumColNum = 0 Then
        MsgBox "Column headers not found. Check header spelling!", vbExclamation
        Exit Sub
    End If
    
    ' Summing values for each key
    For i = 2 To dataRange.Rows.Count
        If Not IsNumeric(dataRange.Cells(i, sumColNum).Value) Then
            ' Ignore non-numeric, prevent errors
            GoTo SkipRow
        End If
        
        If dict.Exists(dataRange.Cells(i, keyColNum).Value) Then
            dict(dataRange.Cells(i, keyColNum).Value) = dict(dataRange.Cells(i, keyColNum).Value) + dataRange.Cells(i, sumColNum).Value
        Else
            dict(dataRange.Cells(i, keyColNum).Value) = dataRange.Cells(i, sumColNum).Value
        End If
SkipRow:
    Next i
    
    ' Output results to new worksheet
    Set destWS = Worksheets.Add
    destWS.Name = "Condensed Summary"
    
    destWS.Cells(1, 1).Value = keyCol
    destWS.Cells(1, 2).Value = "Total " & sumCol
    
    i = 2
    Dim k
    For Each k In dict.Keys
        destWS.Cells(i, 1).Value = k
        destWS.Cells(i, 2).Value = dict(k)
        i = i + 1
    Next k
    
    MsgBox "Condensing complete! Check the worksheet 'Condensed Summary'.", vbInformation
End Sub

2.بعد ذلك، شغّل الماكرو بالنقر على زرزر التشغيلأو الضغط على F5 أثناء تحديد الوحدة النمطية. سيعرض لك مربع حوار يطلب منك تحديد النطاق الكامل لبياناتك (بما في ذلك الرؤوس)، ثم حدد رؤوس الأعمدة للعمود المفتاحي (العمود الذي يحتوي على القيم المكررة) والعمود الرقمي (العمود الذي سيتم جمع قيمه). اتبع التعليمات للمتابعة—سيقوم الماكرو تلقائيًا بحساب المجاميع لكل قيمة فريدة وكتابة النتائج في ورقة عمل جديدة باسم "ملخص مكثف". وبهذا يبقى جدولك الأصلي سليمًا دون أي تغيير!

استكشاف الأخطاء وإصلاحها:

  • إذا ظهرت لك رسالة خطأ «لم يتم العثور على رؤوس الأعمدة»، فتأكد من أن الرؤوس المدخلة تطابق تمامًا تلك الموجودة في ورقة البيانات (مع مراعاة حالة الأحرف).
  • إذا لم يتم إنشاء ملخص، فتحقق من أن تحديد النطاق يتضمن الرؤوس والبيانات، وأن هناك قيمة رقمية واحدة على الأقل في عمود التجميع.

المزايا:

  • يمكن إعادة استخدامه وتعديله بسهولة لمجموعات البيانات الجديدة.
  • سريعٌ جدًّا في التعامل مع الملفات الكبيرة جدًّا، ولا يحتاج إلى أي إضافات خارجية.
  • يمكن توسيعه لدمج حقول إضافية أو لأتمتة حسابات أخرى في المستقبل.

ملخص

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

  • تُعد PivotTables الخيار الأمثل للتحليل التفاعلي وإنشاء الملخصات السريعة، خاصةً في بيئات البيانات المتغيرة.
  • تقدم Kutools لـ Excel ميزات دمج بديهية ومخصصة، مثالية للمستخدمين الذين يتعاملون مع مهام متكررة دون الحاجة إلى البرمجة النصية.
  • توفر الصيغ أقصى درجات المرونة، ويسهُل مراجعتها، وتُناسب التقارير الثابتة أو المنطق المخصّص.
  • تُعد ماكروات VBA حلاً فعّالاً لأتمتة العمليات الدفعية الكبيرة أو المتكررة، ولإنشاء تقارير مختصرة جديدة دون الحاجة إلى تدخل يدوي.
لضمان أعلى درجات الموثوقية، احفظ دائمًا نسخة احتياطية من بياناتك الأصلية قبل إجراء أي تغييرات كبيرة، ثم قارن النتائج للتحقق من دقتها. استكشف الأقسام الإضافية لاكتشاف اقتراحات مفيدة لاستكشاف الأخطاء وإصلاحها، بالإضافة إلى توصيات عملية جاهزة للتطبيق. وإذا كانت لديك احتياجات إضافية أو رغبت في توسيع مجموعة أدوات إكسل الخاصة بك، فإنيحتوي موقعنا الإلكتروني على عدد كبير من الدروس التعليمية التي تساعدك على إتقان إكسل.

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

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

عزِّز مهاراتك في 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.

ExcelWordOutlookTabsPowerPoint
  • حزمة شاملة واحدة— إضافات Excel وWord وOutlook وPowerPoint بالإضافة إلى Office Tab Pro
  • برنامج تثبيت واحد، ترخيص واحد— الإعداد خلال دقائق (جاهز لـ MSI)
  • يعمل بشكل أفضل معًا— إنتاجية ميسَّرة عبر تطبيقات Office
  • تجربة مجانية لمدة 30 يومًا بكامل الميزات— بدون تسجيل، بدون بطاقة ائتمان
  • أفضل قيمة— وفِّر مقارنةً بشراء الإضافات بشكل منفصل