Az ismétlődő sorok kombinálása és értékük összegzése Excelben (egyszerű trükkök)

Az Excelben gyakran előfordul, hogy ismétlődő bejegyzéseket tartalmazó adatkészlettel találkozik. Gyakran előfordulhat, hogy számos adattal találkozhat, ahol a fő kihívás az, hogy hatékonyan kombinálja ezeket az ismétlődő sorokat, miközben egyidejűleg összegzi az értékeket egy megfelelő oszlopban, a következő képernyőképen látható módon. Ebben az összefüggésben számos olyan gyakorlati módszert vizsgálunk meg, amelyek segíthetnek az ismétlődő adatok konszolidálásában és a hozzájuk tartozó értékek összesítésében, javítva az Excel-munkafüzetek átláthatóságát és hasznosságát.

Kombinálja a duplikált sorokat, és összegezze az értékeket

• A Consolidate funkcióval
• Erőteljes funkcióval – Kutools
• Pivot Table-val
• VBA kóddal

Kombinálja az ismétlődő sorokat, és összegezze az értékeket a Consolidate függvénnyel

A Consolidate egy hasznos eszköz számunkra több munkalap vagy sor összevonására Excelben, ezzel a funkcióval a duplikált sorokat kombinálhatjuk, és a hozzájuk tartozó értékeket gyorsan és egyszerűen összegezhetjük. Kérjük, kövesse a következő lépéseket:

1. lépés: Válasszon ki egy célcellát

Válassza ki, hol jelenjenek meg az összevont adatok.

2. lépés: Nyissa meg a Konszolidáció funkciót, és állítsa be a konszolidációt

1. Kattintson az "Adatok" > "Konszolidálás" elemre, lásd a képernyőképet:
   
2. A „Konszolidálás” párbeszédpanelen:
   • (1.) A "Funkció" legördülő listából válassza ki a "Sum" elemet;
   • (2.) Kattintson a "Referencia" mezőben a konszolidálni kívánt tartomány kiválasztásához;
   • (3.) Jelölje be a "Felső sor" és a "Bal oszlop" lehetőséget a "Címkék használata" opciónál;
   • (4.) Végül kattintson az "OK" gombra.
   • 

Eredmény:

Az Excel egyesíti az első oszlopban talált duplikációkat, és összeadja a megfelelő értékeket a szomszédos oszlopokban az alábbi képernyőkép szerint:

A Kutools segítségével kombinálja az ismétlődő sorokat és összegezze az értékeket

Ha telepítette a "Kutools for Excel" programot, a "Speciális sorok kombinálása" funkciója lehetővé teszi az ismétlődő sorok egyszerű kombinálását, lehetőséget biztosítva az adatok összegzésére, számolására, átlagolására vagy egyéb számítások végrehajtására. Sőt, ez a funkció nem korlátozódik egyetlen kulcsoszlopra, több kulcsoszlopot is képes kezelni, így sokkal könnyebbé válik az összetett adatkonszolidációs feladatok.

A "Kutools for Excel" telepítése után válassza ki az adattartományt, majd kattintson a "Kutools" > "Merge & Split" > "Advanced Combine Rows" elemre.

A "Speciális sorok kombinálása" párbeszédpanelen állítsa be a következő műveleteket:

1. Kattintson annak az oszlopnak a nevére, amely alapján a duplikációkat kombinálni szeretné, itt a Termékre kattintok, majd a "Művelet" oszlopban a legördülő listából válassza ki az "Elsődleges kulcs" lehetőséget;
2. Ezután válassza ki annak az oszlopnak a nevét, amelyben az értékeket összegezni szeretné, majd a „Művelet” oszlopban a legördülő listából válassza az „Összeg” lehetőséget;
3. Ami a többi oszlopot illeti, kiválaszthatja a szükséges műveletet, például egyesítheti az értékeket egy adott elválasztóval vagy végrehajthat egy bizonyos számítást; (ez a lépés figyelmen kívül hagyható, ha csak két oszlopa van)
4. Végül megtekintheti a kombinált eredményt, majd kattintson az "OK" gombra.
5. 

Eredmény:

Most a kulcsoszlopban lévő ismétlődő értékeket egyesítjük, és a többi megfelelő értékeket a következő képernyőkép szerint összegezzük:

A Pivot Table segítségével kombinálhatja az ismétlődő sorokat és összegezheti az értékeket

Az Excel kimutatástáblái dinamikus módot biztosítanak az adatok átrendezésére, csoportosítására és összegzésére. Ez a funkció hihetetlenül hasznossá válik, ha duplikált bejegyzésekkel teli adatkészlettel kell szembenéznie, és a megfelelő értékeket össze kell adnia.

1. lépés: Pivot tábla létrehozása

1. Válassza ki az adattartományt. Ezután lépjen a "Beszúrás" fülre, és kattintson a "Pivot Table" elemre, lásd a képernyőképet:
   
2. A felugró párbeszédpanelen válassza ki, hová szeretné elhelyezni a kimutatástáblázat jelentését, és szükség szerint elhelyezheti új vagy meglévő lapra. Ezután kattintson az "OK" gombra. Lásd a képernyőképet:
   
3. Most egy kimutatástábla kerül beszúrásra a kiválasztott célcellába. Lásd a képernyőképet:
   

2. lépés: A kimutatás konfigurálása: 

1. A „PivotTable Fields” panelen húzza a másolatokat tartalmazó mezőt a „Sor” területre. Ez csoportosítja az ismétlődéseket.
2. Ezután húzza az összegezni kívánt értékeket tartalmazó mezőket az „Értékek” területre. Alapértelmezés szerint az Excel összegzi az értékeket. Tekintse meg az alábbi bemutatót:
3. 

Eredmény:

A Pivot Table mostantól duplikátumokkal kombinálva jeleníti meg az adatokat, és összegzi az értékeket, így világos és tömör nézetet kínál az elemzéshez. Lásd a képernyőképet:

Használja a VBA kódot az ismétlődő sorok kombinálásához és az értékek összegzéséhez

Ha érdekli a VBA-kód, ebben a szakaszban egy VBA-kódot adunk meg az ismétlődő sorok konszolidálásához és a megfelelő értékek összegzéséhez más oszlopokban. Kérjük, kövesse a következő lépéseket:

1. lépés: Nyissa meg a VBA-lapmodul-szerkesztőt, és másolja ki a kódot

1. Tartsa lenyomva az "ALT + F11" billentyűket az Excelben a "Microsoft Visual Basic for Applications" ablak megnyitásához.
2. Kattintson a "Beszúrás" > "Modul" elemre, és illessze be a következő kódot a "Modul" ablakba.
   VBA kód: Kombinálja az ismétlődő sorokat, és összegezze az értékeket

   Sub CombineDuplicateRowsAndSumForMultipleColumns()
   'Update by Extendoffice
       Dim SourceRange As Range, OutputRange As Range
       Dim Dict As Object
       Dim DataArray As Variant
       Dim i As Long, j As Long
       Dim Key As Variant
       Dim ColCount As Long
       Dim SumArray() As Variant
       Dim xArr As Variant
       Set SourceRange = Application.InputBox("Select the original range:", "Kutools for Excel", Type:=8)
       If SourceRange Is Nothing Then Exit Sub
       ColCount = SourceRange.Columns.Count
       Set OutputRange = Application.InputBox("Select a cell for output:", "Kutools for Excel", Type:=8)
       If OutputRange Is Nothing Then Exit Sub
       Set Dict = CreateObject("Scripting.Dictionary")
       DataArray = SourceRange.Value
       For i = 1 To UBound(DataArray, 1)
           Key = DataArray(i, 1)
           If Not Dict.Exists(Key) Then
               ReDim SumArray(1 To ColCount - 1)
               For j = 2 To ColCount
                   SumArray(j - 1) = DataArray(i, j)
               Next j
               Dict.Add Key, SumArray
           Else
               xArr = Dict(Key)
               For j = 2 To ColCount
                   xArr(j - 1) = xArr(j - 1) + DataArray(i, j)
               Next j
               Dict(Key) = xArr
           End If
       Next i
       OutputRange.Resize(Dict.Count, ColCount).ClearContents
       i = 1
       For Each Key In Dict.Keys
           OutputRange.Cells(i, 1).Value = Key
           For j = 1 To ColCount - 1
               OutputRange.Cells(i, j + 1).Value = Dict(Key)(j)
           Next j
           i = i + 1
       Next Key
       Set Dict = Nothing
       Set SourceRange = Nothing
       Set OutputRange = Nothing
   End Sub
   

2. lépés: Hajtsa végre a kódot

1. A kód beillesztése után nyomja meg az "F5" billentyűt a kód futtatásához. A prompt mezőben válassza ki az egyesíteni kívánt adattartományt, és összegezze. Ezután kattintson az "OK" gombra.
   
2. És a következő prompt mezőben válasszon ki egy cellát, ahol kiadja az eredményt, majd kattintson az "OK" gombra.
   

Eredmény:

Most az ismétlődő sorokat egyesítettük, és a megfelelő értékeket összegeztük. Lásd a képernyőképet:

Az ismétlődő sorok kombinálása és összegzése az Excelben egyszerű és hatékony lehet. Válasszon az egyszerű Consolidate funkció, a fejlett Kutools, az analitikus Pivot Tables vagy a rugalmas VBA kódolás közül, hogy megtalálja a képességeinek és igényeinek megfelelő megoldást. Ha további Excel-tippeket és trükköket szeretne felfedezni, webhelyünk több ezer oktatóanyagot kínál, kérjük, ide kattintva érheti el őket. Köszönjük, hogy elolvasta, és a jövőben is további hasznos információkkal szolgálunk!

Kapcsolódó cikkek: