Preskoči na glavno vsebino

V Excelu je pogost scenarij, da naletite na nabor podatkov s podvojenimi vnosi. Pogosto se lahko znajdete z vrsto podatkov, pri katerih je ključni izziv učinkovito združiti te podvojene vrstice in hkrati sešteti vrednosti v ustreznem stolpcu, kot je prikazano na naslednjem posnetku zaslona. V tem kontekstu se bomo poglobili v več praktičnih metod, ki vam lahko pomagajo konsolidirati podvojene podatke in združiti njihove povezane vrednosti, s čimer izboljšate jasnost in uporabnost vaših Excelovih delovnih zvezkov.


Združite podvojene vrstice in seštejte vrednosti s funkcijo Consolidate

Consolidate je uporabno orodje za združevanje več delovnih listov ali vrstic v Excelu. S to funkcijo lahko združimo podvojene vrstice in hitro in enostavno seštejemo njihove ustrezne vrednosti. Izvedite naslednje korake:

1. korak: Izberite ciljno celico

Izberite, kje želite, da se prikažejo konsolidirani podatki.

2. korak: Dostopite do funkcije konsolidacije in nastavite konsolidacijo

  1. klik datum > utrditi, glej posnetek zaslona:
  2. v utrditi pogovorno okno:
    • (1.) Izberite Seštevek iz funkcija spustni seznam;
    • (2.) Kliknite, da izberete obseg, ki ga želite konsolidirati v Reference škatla;
    • (3.) Preverite Zgornja vrstica in Levi stolpec iz Uporabite nalepke v možnost;
    • (4.) Na koncu kliknite OK gumb.

Rezultat:

Excel bo združil vse dvojnike, najdene v prvem stolpcu, in seštel njihove ustrezne vrednosti v sosednjih stolpcih, kot je prikazano na naslednjem posnetku zaslona:

Opombe:
  • Če obseg ne vključuje naslovne vrstice, poskrbite, da bo počistite polje Zgornja vrstica Iz Uporabite nalepke v možnost.
  • S to funkcijo je mogoče izračune konsolidirati samo na podlagi prvega stolpca (skrajno levi) podatkov.

Združite podvojene vrstice in seštejte vrednosti z zmogljivo funkcijo – Kutools

Če ste namestili Kutools za Excel, njeno Napredne kombinirane vrstice Funkcija vam omogoča preprosto združevanje podvojenih vrstic, ki ponuja možnosti za seštevanje, štetje, povprečje ali izvajanje drugih izračunov na vaših podatkih. Poleg tega ta funkcija ni omejena samo na en ključni stolpec, ampak lahko obravnava več ključnih stolpcev, kar močno olajša zapletene naloge konsolidacije podatkov.

Opombe: Če želite uporabiti to Napredne kombinirane vrstice funkcijo, prosim prenesite in namestite Kutools za Excel najprej.

Po namestitvi Kutools za Excel, izberite obseg podatkov in kliknite Kutools > Spoji in razdeli > Napredne kombinirane vrstice.

v Napredne kombinirane vrstice v pogovornem oknu nastavite naslednje postopke:

  1. Kliknite ime stolpca, na podlagi katerega želite združiti dvojnike, tukaj bom kliknil Izdelek in nato izbral Primarni ključ s spustnega seznama v operacija stolpec;
  2. Nato izberite ime stolpca, v katerem želite sešteti vrednosti, in nato izberite Seštevek s spustnega seznama v operacija stolpec;
  3. Kar zadeva druge stolpce, lahko izberete operacijo, ki jo potrebujete, kot je združevanje vrednosti z določenim ločilom ali izvajanje določenega izračuna; (ta korak lahko prezrete, če imate samo dva stolpca)
  4. Končno si lahko predogledate kombinirani rezultat in nato kliknete OK gumb.

Rezultat:

Zdaj so podvojene vrednosti v stolpcu s ključi združene, druge ustrezne vrednosti pa so seštete, kot je prikazan naslednji posnetek zaslona:

Nasvet:
  • S to uporabno funkcijo lahko tudi kombinirate vrstice na podlagi podvojene vrednosti celice, kot je prikazana naslednja predstavitev:
  • Ta funkcija podpira Undo, če želite obnoviti izvirne podatke, samo pritisnite Ctrl + Z.
  • Če želite uporabiti to funkcijo, prosim prenesite in namestite Kutools za Excel najprej.

Združite podvojene vrstice in seštejte vrednosti z vrtilno tabelo

Vrtilna tabela v Excelu zagotavlja dinamičen način za preurejanje, združevanje in povzemanje podatkov. Ta funkcionalnost postane izjemno uporabna, ko se soočite z naborom podatkov, polnim podvojenih vnosov in morate sešteti ustrezne vrednosti.

1. korak: Ustvarjanje vrtilne tabele

  1. Izberite obseg podatkov. In potem pojdite na Vstavi in kliknite Vrteča miza, glej posnetek zaslona:
  2. V pogovornem oknu, ki se odpre, izberite, kam želite postaviti poročilo vrtilne tabele, lahko ga postavite na nov ali obstoječi list, kot želite. Nato kliknite OK. Oglejte si posnetek zaslona:
  3. Zdaj je vrtilna tabela vstavljena v izbrano ciljno celico. Oglejte si posnetek zaslona:

2. korak: Konfiguracija vrtilne tabele:

  1. v Polja vrtilne tabele podoknu povlecite polje z dvojniki v Vrstica območje. To bo združilo vaše dvojnike.
  2. Nato povlecite polja z vrednostmi, ki jih želite sešteti, na Vrednote območje. Excel privzeto sešteje vrednosti. Oglejte si spodnjo predstavitev:

Rezultat:

Vrtilna tabela zdaj prikazuje vaše podatke s kombiniranimi dvojniki in seštevanjem njihovih vrednosti, kar ponuja jasen in jedrnat pogled za analizo. Oglejte si posnetek zaslona:


Združite podvojene vrstice in seštejte vrednosti s kodo VBA

Če vas zanima koda VBA, bomo v tem razdelku podali kodo VBA za združevanje podvojenih vrstic in seštevanje ustreznih vrednosti v drugih stolpcih. Izvedite naslednje korake:

1. korak: Odprite urejevalnik modulov lista VBA in kopirajte kodo

  1. Drži dol ALT + F11 tipke v Excelu, da odprete Microsoft Visual Basic za aplikacije okno.
  2. klik Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
    Koda VBA: združite podvojene vrstice in seštejte vrednosti
    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. korak: Izvedite kodo

  1. Po lepljenju te kode pritisnite F5 ključ za zagon te kode. V pozivnem polju izberite obseg podatkov, ki jih želite združiti in sešteti. In nato kliknite OK.
  2. In v naslednjem pozivnem polju izberite celico, v katero boste izpisali rezultat, in kliknite OK.

Rezultat:

Zdaj so podvojene vrstice združene in njihove ustrezne vrednosti so seštete. Oglejte si posnetek zaslona:


Združevanje in seštevanje podvojenih vrstic v Excelu je lahko preprosto in učinkovito. Izbirajte med enostavno funkcijo Consolidate, naprednimi orodji Kutools, analitičnimi vrtilnimi tabelami ali prilagodljivim kodiranjem VBA, da poiščete rešitev, ki ustreza vašim sposobnostim in potrebam. Če vas zanima več nasvetov in trikov za Excel, naše spletno mesto ponuja na tisoče vadnic kliknite tukaj za dostop do njih. Hvala za branje in veselimo se, da vam bomo v prihodnje zagotovili več koristnih informacij!


Sorodni članki:

  • Združite več vrstic v eno na podlagi dvojnikov
  • Morda imate vrsto podatkov, v stolpcu A z imenom izdelka je nekaj podvojenih elementov, zdaj pa morate odstraniti podvojene vnose v stolpcu A, vendar združiti ustrezne vrednosti v stolpcu B. Kako bi lahko opravili to nalogo v Excelu ?
  • Vlookup in vrnitev več vrednosti brez dvojnikov
  • Včasih boste morda želeli vlookup in vrniti več ujemajočih se vrednosti v eno celico hkrati. Toda, če je v vrnjene celice vnesenih nekaj ponavljajočih se vrednosti, kako lahko prezrete dvojnike in ohranite edinstvene vrednosti le, če vrnete vse ujemajoče se vrednosti, kot je prikazano na sliki zaslona, ​​prikazani v Excelu?
  • Združite vrstice z istim ID-jem/imenom
  • Na primer, imate prikazano tabelo, kot je prikazano na spodnji sliki zaslona, ​​in morate kombinirati vrstice z ID-ji naročil, kakšne ideje? Tukaj bo ta članek predstavil dve rešitvi za vas.
Comments (30)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Em planilha sem cálculo número, onde eu tenho uma lista de prestadores de serviço para determinadas empresas, como faço para deixar classificado por empresas, por ordem de empresas? Se é possível.
Na planilha eu tenho, o nome da pessoa, razão social e empresa. Neste caso algumas empresas repetem, gostaria de classificar automático, sem precisar refazer um por um.
This comment was minimized by the moderator on the site
is there a way to save the specific merging and combining settings so that i can reuse them for future workbooks?
This comment was minimized by the moderator on the site
Thanks for your help.

This comment was minimized by the moderator on the site
SN SAD No Unit Item No Description Qty CIF_Value ID_EXD AID CSF ARF ECS RCF RDF IFT IDP AIT VAT
1 M200 UNT 1 Pen 194 500 50 0 0 0 0 0 0 0 0 0 65
2 M200 UNT 2 Pencil 241 250 25 0 0 0 0 0 0 0 0 0 32.5
3 M200 UNT 3 Cutter 204 400 40 0 0 0 0 0 0 0 0 0 52
4 M200 UNT 4 Copy 171 600 60 0 0 0 0 0 0 0 0 0 78
5 M300 KGM 1 Cup 220 250 25 0 500 0 0 0 0 0 0 0 32.5
6 M300 KGM 2 Plate 40 350 35 155 0 0 0 0 0 0 0 0 45.5
7 M300 UNT 3 Bottle 2 150 15 131 0 0 0 0 0 0 0 0 19.5
8 M300 UNT 4 Glass 2 90 9 34 0 0 0 0 0 0 0 0 11.7
9 M400 null 1 Shirt 20 800 80 0 0 0 0 0 0 0 0 0 104
10 M400 KGM 2 Pant 5 5000 500 0 0 0 0 0 0 0 0 0 650
11 M400 null 3 Shoe 12 7200 720 0 0 0 0 0 0 0 0 0 936
12 M400 MTR 4 Sandle 40 1600 160 0 0 0 0 0 0 0 0 0 208
13 M400 UNT 5 Belt 100 2000 200 0 0 0 0 0 0 0 0 0 260
how to sum cif value and remove duplicate No. (SAD No.) Please help me.
This comment was minimized by the moderator on the site
I am sooooo happy & glad with your tips. Allah bless you.
This comment was minimized by the moderator on the site
Sub MergeSameCells()
Application.DisplayAlerts = False

Dim rng As Range

MergeCells:

For Each rng In Selection
If rng.Value = rng.Offset(1, 0).Value And rng.Value <> "" Then
Range(rng, rng.Offset(1, 0)).Merge
GoTo MergeCells
End If
Next

End Sub
This comment was minimized by the moderator on the site
An absolute mess of an explantation. Thanks for the effort but it did nothing to help.
This comment was minimized by the moderator on the site
LOVE IT!!! YOUR SAVE MY LIFE!!
This comment was minimized by the moderator on the site
Ifsum=(columns include,start point row,sum column)
Example ifsum=(A:D,B:2,D:D)
WAY EASIER!
This comment was minimized by the moderator on the site
Hi Am chinnaraju

can u please assist for this. Any one?

=VLOOKUP(M5,E:F,2,)


Thanks in advance.
This comment was minimized by the moderator on the site
Needs to be:
=VLOOKUP(M5,E:F,2,FALSE)
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations