KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe kunt u rijen snel samenvoegen op basis van dezelfde waarde in Excel?

AuteurSun Wijzigingsdatum
Een schermafbeelding met gegevens met dubbele ordernamen in Excel
Bij het werken met Excel-gegevens komt het vaak voor dat u rijen hebt met Dubbele waarden in één kolom en bijbehorende numerieke gegevens die moeten worden gecombineerd of opgeteld. Stel dat u twee kolommen heeft — een Bestelkolom met dubbele waarden en een Verkoopkolom — en u wilt rijen consolideren door de verkoopwaarden op te tellen voor elke unieke bestelling, zoals weergegeven in de schermafbeelding. In dit artikel leidt u stap voor stap langs een geoptimaliseerde methode om rijen samen te vatten op basis van een gemeenschappelijke waarde met verschillende technieken.

Rijen samenvatten op basis van waarde met draaitabel

Rijen samenvatten op basis van waarde met Kutools voor Excel
Rijen samenvatten op basis van waarde met formules
Rijen samenvoegen en optellen met een VBA-macro

Rijen samenvoegen op basis van waarde met PivotTable

De PivotTable-functie van Excel is ontworpen om gegevens snel en efficiënt samen te vatten — perfect wanneer u rijen wilt samenvoegen op basis van dubbele waarden in één kolom en numerieke gegevens in een andere kolom wilt aggregeren. Ideaal voor gebruikers die een interactieve overzichtstabel willen met eenvoudige opties om resultaten verder te groeperen, filteren en analyseren. PivotTables zijn uitstekend geschikt voor het verwerken van grote datasets en kunnen met minimale inspanning worden bijgewerkt.

1. Selecteer het volledige bereik van uw gegevens, inclusief de kolomkoppen, en ga naar het tabblad Invoegen bovenaan in het lint. Klik vervolgens op PivotTable. Het dialoogvenster „PivotTable maken” verschijnt — kies of u de PivotTable in een Nieuw werkblad of in een Bestaand werkblad wilt plaatsen, afhankelijk van uw workflow, en klik daarna op OK. Zie schermafbeelding:

2. Sleep in het deelvenster „PivotTable-velden” het veld Order naar het gebied Rijen en het veld Verkoop naar het gebied Waarden. Hierdoor wordt automatisch een overzichtstabel gegenereerd met elke unieke order en de bijbehorende som van de verkopen.

Tip: Standaard telt een draaitabel uw numerieke kolom op. Wilt u een andere berekening, zoals Gemiddelde, Aantal, Min of Max? Klik dan op de pijl-omlaag naast „Som van Verkoop” in het gedeelte „Waarden”, selecteer Waarde-instellingen en kies de gewenste bewerking.
Een schermafbeelding van Waardeveldinstellingen in draaitabel voor andere berekeningen

Voordelen:

  • Ideaal voor dynamische analyse en dataverkenning.
  • Wordt automatisch bijgewerkt zodra uw brongegevens wijzigen.
  • Biedt uitgebreide opties voor verdere filtering, groepering en aanpassing van de lay-out.
Nadelen:
  • Vereist vertrouwdheid met PivotTable-besturingselementen voor geavanceerde aanpassingen.

Rijen samenvoegen op basis van waarde met Kutools voor Excel

„Kutools voor Excel” biedt een gestroomlijnde methode om Dubbele rij te combineren en uw gegevens samen te vatten, wat het met name geschikt maakt voor herhaalde of uitgebreide taken. Deze tool is ideaal voor gebruikers die grote hoeveelheden gegevens beheren en informatie willen transformeren of samenvatten zonder complex handmatig werk.

Opmerking: Kutools voert bewerkingen direct uit op Oorspronkelijk gegevensbereik. Maak van tevoren een back-up van uw gegevens om gegevensveiligheid te garanderen, aangezien wijzigingen na samenvoegen niet eenvoudig ongedaan kunnen worden gemaakt.
Kutools voor Excelbiedt meer dan 300 geavanceerde functies om complexe taken te stroomlijnen, waardoor creativiteit en efficiëntie worden verhoogd.Geïntegreerd met AI-mogelijkheden, automatiseert Kutools taken met precisie, zodat databeheer moeiteloos verloopt.Gedetailleerde informatie over Kutools voor Excel...         Gratis proefversie...

1. Markeer het gegevensbereik dat u wilt samenvoegen. Ga vervolgens naar Kutools op de werkbalk en selecteer Samenvoegen en splitsen > Geavanceerd samenvoegen van rijen.

2. Het dialoogvenster „Geavanceerd samenvoegen van rijen” verschijnt. Volg deze stappen:

  • Klik op de koptekst van de kolom met dubbele waarden en stel deze in als de primaire sleutel. Zo geeft u aan welke waarden Excel moet gebruiken om gegevens te groeperen.
  • Klik op de koptekst van de kolom met numerieke waarden die u wilt samenvoegen. Kies in de Bewerking-keuzelijst een geschikte berekening onder het gedeelte „Berekenen”, zoals Som, Gemiddelde, Max of Min, afhankelijk van uw behoeften.
  • Nadat u deze instellingen hebt opgegeven, klikt u op OK om de samenvoeging uit te voeren.

3. De rijen worden samengevoegd en de opgegeven berekening wordt toegepast op de geselecteerde kolom.

Praktische tips:

  • Als uw gegevensset lege cellen of niet-numerieke tekst bevat, controleer dan of de berekeningskolom uitsluitend getallen bevat om onverwachte resultaten te voorkomen.
  • Kutools is vooral aan te raden voor grote gegevenssets die handmatig moeilijk samen te voegen zijn.
Voordelen:
  • Uiterst snel en eenvoudig voor batchverwerking.
  • U bepaalt zelf volledig hoe duplicaten worden samengevoegd en welke kolommen daarbij worden meegenomen.
Nadelen:
  • Vereist dat de invoegtoepassing Kutools voor Excel is geïnstalleerd.
  • Wijzig uw oorspronkelijke gegevensbereik (ongedaan maken met Ctrl+Z als het nog niet is opgeslagen).

Kutools voor Excel– Geef Excel een boost met meer dan 300 essentiële hulpmiddelen, waardoor uw werk sneller en eenvoudiger verloopt, en profiteer van AI-functies voor slimmere gegevensverwerking en productiviteit.Nu verkrijgen


Rijen samenvoegen op basis van waarde met formules

Excel-formules bieden een flexibele manier om gegevens samen te vatten zonder uw werkblad te hoeven herstructureren. Deze methode is ideaal voor aangepaste taken, kleinere gegevenssets of wanneer u informatie op een aparte plek wilt samenvoegen terwijl de brongegevens intact blijven. Populaire formules zoals SOM.ALS berekenen automatisch totalen voor elke unieke waarde.

1. Kies een lege cel naast uw gegevensbereik—bijvoorbeeld cel D2—en voer de volgende formule in. Druk op Shift + Ctrl + Enter om de eerste unieke waarde te berekenen.

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

Opmerking: Pas de bereiken in de formule aan — „A2:A12” verwijst naar de lijst met mogelijke duplicaten en „D1” is de startcel voor uw resultaten. Zorg ervoor dat de celverwijzingen overeenkomen met uw werkelijke werkblad, en gebruik absolute verwijzingen als u van plan bent de formule naar andere cellen te kopiëren.

2. Selecteer cel D2 (waar u de formule hebt ingevoerd) en sleep de automatisch aanvulgreep naar beneden tot het einde van uw lijst of totdat een foutwaarde verschijnt—dat betekent dat alle unieke items zijn weergegeven.

3. Verwijder alle foutmeldingen die aan het einde van uw lijst verschijnen. Ga vervolgens naar de aangrenzende cel in het resultaatterrein (bijv. E2), voer de volgende formule in om waarden per item op te tellen, druk op Enter en sleep de formule naar beneden om deze op andere rijen toe te passen.

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

Opmerking: „A2:A12” is de brondkolom waarin u op zoek bent naar duplicaten, „D2” is de cel met de eerste unieke waarde en „B2:B12” is de kolom met de verkoop- of numerieke waarden. Pas deze verwijzingen zo nodig aan aan uw gegevensset.

Tips en voorzorgsmaatregelen:

  • Formules passen de oorspronkelijke gegevens niet aan en zijn dan ook bij uitstek geschikt voor samenvattende rapporten naast elkaar.
  • Indien gewenst kunt u andere aggregatiefuncties gebruiken—zoals AANTAL.ALS, GEMIDDELDE.ALS, enz.—om aan uw analysebehoeften te voldoen.

Rijen samenvoegen en optellen met een VBA-macro

Wanneer u werkt met bijzonder grote gegevenssets of rijen herhaaldelijk moet samenvoegen op basis van identieke waarden, bespaart het automatiseren van dit proces met een VBA-macro u aanzienlijk tijd en moeite. Met deze aanpak verwerkt u honderden of duizenden rijen in één keer of integreert u de functionaliteit naadloos in een aangepaste workflow. De hier geboden VBA-oplossing telt waarden in een opgegeven kolom op voor elk uniek item in een andere kolom en plaatst de gecondenseerde resultaten op een nieuw werkblad — zonder uw oorspronkelijke gegevens aan te passen.

1. Open Excel en druk op Alt+F11 om de Visual Basic for Applications-editor te openen. Klik in de VBA-editor op Invoegen > Module om een nieuwe codemodule te maken. Kopieer en plak de volgende code in het modulevenster:

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. Voer de macro vervolgens uit door op de Uitvoeren-knop knop te klikken of op F5 te drukken terwijl de module is geselecteerd. Er verschijnt een dialoogvenster waarin u het volledige bereik van uw gegevens (inclusief kopteksten) moet selecteren. Selecteer daarna de kolomkoppen voor uw sleutelkolom (duplicaten) en numerieke kolom (som). Volg de aanwijzingen om door te gaan — de macro berekent automatisch totalen per unieke waarde en schrijft de resultaten naar een nieuw werkblad met de naam "Condensed Summary". Zo blijft uw oorspronkelijke werkblad veilig ongewijzigd.

Probleemoplossing:

  • Als u een foutmelding „Kolomkoppen niet gevonden” krijgt, zorg er dan voor dat de ingevoerde koppen exact overeenkomen met die in het gegevensblad (hoofdlettergevoelig).
  • Als er geen samenvatting wordt gemaakt, controleer dan of de Bereik selecteren zowel koppen als gegevens bevat en of er ten minste één numerieke waarde in de aggregatiekolom staat.

Voordelen:

  • Opnieuw te gebruiken en aan te passen voor nieuwe gegevenssets.
  • Snel, zelfs voor zeer grote bestanden, en vereist geen externe invoegtoepassingen.
  • Kan worden uitgebreid om in de toekomst extra velden te combineren of andere berekeningen te automatiseren.

Samenvatting

Wanneer u rijen in Excel wilt samenvoegen of analyseren op basis van gemeenschappelijke waarden, hangt de juiste aanpak af van uw doelstellingen en de structuur van uw werkmap:

  • PivotTables zijn ideaal voor interactieve analyse en snelle samenvattingen, vooral in dynamische gegevensomgevingen.
  • Kutools voor Excel biedt intuïtieve, aangepaste samenvoegfuncties – perfect voor gebruikers die herhaalde taken uitvoeren zonder scripts.
  • Formules bieden maximale flexibiliteit, zijn eenvoudig te controleren en ideaal voor statische rapporten of aangepaste logica.
  • VBA-macro’s zijn uiterst efficiënt voor het automatiseren van omvangrijke of herhaalde batchbewerkingen en genereren nieuwe, gecondenseerde rapporten zonder enige handmatige inspanning.
Voor maximale betrouwbaarheid raden we u aan om altijd een back-up te maken van uw brongegevens vóór grote wijzigingen en de resultaten te vergelijken om de nauwkeurigheid te garanderen. Bekijk de aanvullende secties voor handige tips bij probleemoplossing en praktische aanbevelingen. Mocht u extra behoeften hebben of uw Excel-toolkit willen uitbreiden, dan biedt onze website tal van tutorials om u te helpen Excel onder de knie te krijgen.

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...


Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger

  • Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
  • Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!

Alle Kutools-add-ins in één installatieprogramma.

Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.

ExcelWordOutlookTabsPowerPoint
  • Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
  • Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
  • Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
  • 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
  • Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins