Hogyan lehet kombinálni a duplikált sorokat, és összegezni az értékeket az Excelben?

Az Excel ， alkalmazásban mindig találkozhat ezzel a problémával, ha van olyan adattartománya, amely tartalmaz néhány ismétlődő bejegyzést, és most össze kívánja kapcsolni az ismétlődő adatokat, és összegezni a megfelelő értékeket egy másik oszlopban, az alábbi képernyőképek szerint. Hogyan tudná megoldani ezt a problémát?

Kombinálja a duplikált sorokat, és összegezze az értékeket a Konszolidálás funkcióval

Kombinálja a duplikált sorokat, és összegezze az értékeket a VBA kóddal

Kombinálja a duplikált sorokat, és összegezze az értékeket a Kutools for Excel programmal

Kombinálja a megfelelő sorokat az ismétlődő értékek alapján egy másik oszlopban a Kutools for Excel programmal

Kombinálja a duplikált sorokat, és összegezze az értékeket a Konszolidálás funkcióval

Az Összevonás hasznos eszköz számunkra, hogy több munkalapot vagy sort konszolidáljunk az Excel programban, így ezzel a funkcióval több sort is összefoglalhatunk a másolatok alapján. Kérjük, tegye a következőket:

1. Kattintson arra a cellára, ahol meg szeretné találni az eredményt az aktuális munkalapon.

2. Kattintson a gombra dátum > Összesítés, lásd a képernyőképet:

3. Az Összesítés párbeszédablak:

• (1.) Válassza ki Összeg ból ből Funkció legördülő lista;
• (2.) Kattintson gombbal válassza ki az összevonni kívánt tartományt, majd kattintson a gombra hozzáad gombra a hivatkozás hozzáadásához Minden hivatkozás lista mező;
• (3.) Ellenőrizze Felső sor és a Bal oszlop ból ből Használjon címkéket itt választási lehetőség. Lásd a képernyőképet:

4. A beállítások elvégzése után kattintson a gombra OK, és a másolatokat egyesítik és összegzik. Lásd a képernyőképet:

Megjegyzések: Ha a tartománynak nincs fejléc sora, akkor törölje a jelölést Felső sor tól Használjon címkéket itt opciót.

Kombinálja a duplikált sorokat, és összegezze az értékeket a VBA kóddal

A következő VBA-kód szintén segíthet az ismétlődő sorok konszolidálásában a munkalapon, ugyanakkor az eredeti adatok megsemmisülnek, és biztonsági másolatot kell készítenie az adatokról.

1. Tartsa lenyomva a ALT + F11 gombokat, majd kinyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA kód: Kombinálja az ismétlődő sorokat, és összegezze az értékeket

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. Ezután nyomja meg a gombot F5 gombot a kód futtatásához, és ki kell választania az összevonni kívánt tartományt a felbukkanó prompt mezőben. Lásd a képernyőképet:

4. Kattintson a gombra OK, az ismétlődő sorokat egyesítettük, és az értékeket összeadtuk.

Megjegyzések: Ha ezt a kódot szeretné használni, akkor jobb, ha másolatot készít a fájlból, hogy elkerülje az adatok megsemmisítését, és ez a kód csak két oszlopra vonatkozik.

Kombinálja a duplikált sorokat, és összegezze az értékeket a Kutools for Excel programmal

Itt bemutatom a praktikus eszközt - Kutools az Excel számára neked, annak Haladó kombinált sorok szintén gyorsan tehet egy szívességet a probléma megoldása érdekében.

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Válassza ki a kívánt tartományt, és kattintson Kutools > Egyesítés és felosztás > Haladó kombinált sorok. Lásd a képernyőképet:

2. Az Haladó kombinált sorok párbeszédpanelen ellenőrizze Adataim fejléceket tartalmaznak ha a tartománynak vannak fejlécei, és válassza ki az oszlop nevét, amelyhez össze szeretné kapcsolni az ismétléseket, majd kattintson Elsődleges kulcs, lásd a képernyőképet:

3. Ezután válassza ki az oszlop nevét, amelynek összegezni kívánja az értékeket, majd kattintson Számít > Összeg vagy egyéb számítások, amire szüksége van. Lásd a képernyőképet:

4. Kattints Ok a párbeszédablak bezárásához láthatja, hogy a duplikátumok egyesülnek, és egy másik oszlop megfelelő adatait összeadják. Képernyőképek megtekintése:

Kattintson ide, ha többet szeretne megtudni a Haladó kombinált sorokról.

Kombinálja a megfelelő sorokat az ismétlődő értékek alapján egy másik oszlopban a Kutools for Excel programmal

Előfordulhat, hogy a sorokat duplikált értékek alapján kívánja kombinálni egy másik oszlopban, a Haladó kombinált sorok of Kutools az Excel számára is tehet egy szívességet az Ön számára, kérjük, tegye a következőket:

1. Válassza ki a használni kívánt adattartományt, majd kattintson a gombra Kutools > Egyesítés és felosztás > Haladó kombinált sorok hogy engedélyezze a Haladó kombinált sorok párbeszédablak.

2. Az Haladó kombinált sorok párbeszédpanelen kattintson annak az oszlopnak a nevére, amely alapján más adatokat össze kíván kapcsolni, majd kattintson a gombra Elsődleges kulcs, lásd a képernyőképet:

3. Ezután kattintson egy másik oszlop nevére, amelyre össze kívánja vonni az adatokat, majd kattintson a gombra Kombájn elválasztó kiválasztásához az egyesített értékek elválasztásához lásd a képernyőképet:

4. Ezután kattintson Ok, az A oszlopban ugyanazzal a cellával rendelkező összes értéket egyesítettük, lásd a képernyőképeket:

Kombinálja a duplikált sorokat, és összegezze az értékeket a Kutools for Excel programmal

Kapcsolódó cikk:

Kombináljon több sort egybe duplikált értékek alapján

---

A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

• újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
• Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
• Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
• Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
• Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
• Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
• Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
• Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
• Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2021 és 365 verziókat. Minden nyelvet támogat. Könnyű üzembe helyezés vállalatában vagy szervezetében. Teljes funkciók 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Tovább ... Ingyenes letöltés... Vásárlás... 

---

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

• Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
• Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
• 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!

Tovább ... Ingyenes letöltés... Vásárlás...