Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe combineer je meerdere rijen in een op basis van duplicaten in Excel?

Misschien hebt u de volgende schermgegevens, in de kolom Productnaam A zijn er enkele dubbele items en nu moet u de dubbele vermeldingen in kolom A verwijderen maar de bijbehorende waarden in kolom B combineren, zie schermafbeeldingen:

doc-geavanceerde combine1 -2 doc-geavanceerde combine2

Heb je een aantal effectieve manieren om deze taak op te lossen?

Combineer meerdere dubbele rijen in één met VBA-code

Combineer meerdere dubbele rijen in één Kutools voor Excel

Combineer meerdere dubbele rijen en som / gemiddelde de waarden met Kutools voor Excel

Tabblad Office Schakel bewerken en browsen met tabbladen in Office in en maak uw werk veel eenvoudiger ...
Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%
  • Alles hergebruiken: Voeg de meest gebruikte of complexe formules, grafieken en al het andere toe aan uw favorieten en hergebruik ze snel in de toekomst.
  • Meer dan 20-tekstfuncties: Nummer uit tekststring halen; Een deel van de tekst extraheren of verwijderen; Nummers en valuta's omzetten in Engelse woorden ...
  • Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Dubbele rijen en som samenvoegen ...
  • Split gereedschap: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen ...
  • Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Maak een verzendlijst en Verzend e-mails op waarde van Cell...
  • Super filter: Maak geavanceerde filterschema's en pas deze toe op alle bladen; Soort per week, dag, frequentie en meer; filters door vetgedrukt, formules, commentaar ...
  • Meer dan 300 krachtige functies; Werkt met Office 2007-2019 en 365; Ondersteunt alle talen; Eenvoudig te implementeren in uw onderneming of organisatie.

pijl blauwe rechterbelCombineer meerdere dubbele rijen in één met VBA-code


De volgende VBA-code kan u helpen dubbele rijen te combineren op basis van de waarde van kolom A en de volgende code wordt alleen toegepast voor twee kolommen. Dus, als u twee kolommen gegevens heeft, zal deze code een gunst voor u doen.

1. Houd de toets ingedrukt ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.

2. Klikken bijvoegsel > moduleen plak de volgende code in de Module venster.

VBA-code: combineer meerdere rijen in één

Sub CombineRows()
'Update 20131202
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)
    xvalue = arr(i, 1)
    If Dic.Exists(xvalue) Then
        Dic(arr(i, 1)) = Dic(arr(i, 1)) & " " & arr(i, 2)
    Else
        Dic(arr(i, 1)) = arr(i, 2)
    End If
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. Druk vervolgens op F5 toets en er verschijnt een promptvak om u eraan te herinneren een bereik te selecteren dat u moet combineren. Zie screenshot:

doc-geavanceerde combine3

4. En klik vervolgens op OK, de waarden in kolom B zijn gecombineerd tot één record en gescheiden door spaties.

doc-geavanceerde combine4

Opmerkingen:

1. Deze code kan de originele gegevens vernietigen. Als u deze gebruikt, kunt u beter eerst een back-up van de gegevens maken.

2. Deze code wordt alleen toegepast voor twee kolommen. Als u meer dan twee kolommen hebt, combineert deze code alleen de eerste twee kolommen en worden andere kolommengegevens verwijderd. Wanneer u deze code gebruikt, moet u voorzichtig zijn.


pijl blauwe rechterbelCombineer meerdere dubbele rijen in één Kutools voor Excel

Nu de bovenstaande code enkele beperkingen en risico's bevat, is er een handige en veilige manier om deze taak af te ronden? Met Kutools for Excel's Geavanceerd Combineer rijen hulpprogramma kunt u snel meerdere dubbele rijen verwijderen in de kolommen die u hebt gebaseerd en samenvoegen of een aantal berekeningen uitvoeren voor andere records in de juiste cellen.

Kutools for Excel bevat meer dan handige Excel-gereedschappen van 300. Gratis om te proberen zonder beperking in 30-dagen. Get it Now.

Na het installeren van Kutools voor Excel doet u het volgende:

1. Selecteer de bereikgegevens waarvoor u duplicaten wilt combineren.

doc-geavanceerde combine5

2. Dan klikken Kutools > Content Converter > Geavanceerd Combineer rijen. Zie screenshot:

doc-geavanceerde combine6

3. In de Geavanceerd Combineer rijen dialoogvenster, selecteert u de kolomnaam als de belangrijkste kolommen waarvoor u waarden wilt combineren op basis van en klikt u vervolgens op Belangrijke kolommen. Zie screenshot:

doc-geavanceerde combine7

4. Klik vervolgens op de kolom die u nodig hebt om hun waarden te combineren in één record en klik vervolgens op Combineer operaties En kies Alleen combineren met scheidingstekenen kies een scheidingsteken dat u nodig heeft om de gecombineerde waarden van de rechterlijst te scheiden. Zie screenshot:

doc-geavanceerde combine8

5. Klik na het voltooien van de instellingen op OKen uw gegevens worden samengevoegd op basis van de belangrijkste kolommen en gescheiden door scheidingstekens.

doc-geavanceerde combine9

Let op: Als u de bewerkingen voor de rustkolommen niet hoeft in te stellen, hoeft u alleen de standaardstatus te behouden.


pijl blauwe rechterbelCombineer meerdere dubbele rijen en som / gemiddelde de waarden met Kutools voor Excel

Met deze multifunctionele Geavanceerd Combineer rijen hulpprogramma, kunt u dubbele rijen combineren en ook enkele berekeningen uitvoeren voor de waarden.

1. Selecteer de bereikgegevens waarvoor u duplicaten wilt combineren.

2. Ga naar de Geavanceerd Combineer rijen dialoog venster;

  • (1.) Selecteer een kolomnaam als sleutelkolom waarvoor u andere kolomwaarden wilt berekenen op basis van en klik vervolgens op Belangrijke kolommen;
  • (2.) Selecteer de kolom die u nodig hebt om enkele berekeningen voor de waarden uit te voeren en klik vervolgens op Combineer operaties > Combineer met berekenen, kies dan een berekeningstype dat u nodig hebt, in dit geval kies ik Som. Zie screenshot:

doc-geavanceerde combine10

3. Als u de bewerkingen voor de rustkolommen niet hoeft in te stellen, houdt u gewoon de standaardstatus aan en klikt u vervolgens op OKen de dubbele waarden in kolom A worden samengevoegd en de bijbehorende waarden in kolom B worden opgeteld. Zie screenshots:

doc-geavanceerde combine11 -2 doc-geavanceerde combine12

Opmerkingen:

1. Als je het controleert Mijn gegevens hebben headers optie, worden uw koppen (de eerste rij) van het bereik genegeerd wanneer u dit hulpprogramma toepast.

2. Gebruik opgemaakte waarden: het blijft de opmaak van de waarden behouden na het combineren van de dubbele cellen.

3. Dit hulpprogramma is niet beschikbaar voor het filteren van gegevens.

Klik om meer te weten over deze Advanced Combine Rows-functie.


Gerelateerd artikel:

Combineer dubbele rijen en som de waarden bij elkaar


Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Inhoud gesplitste cellen; Combineer dubbele rijen / kolommen... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functionaliteit 30-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ashley · 1 years ago
    I have used the code above successfully in the past however today, it is deleting column B. Looks like it's just removing duplicates...not sure what the issue is.

    Sample Data
    Reece, Ashley G01-Registered-UWG
    Reece, Chris G02-Registered-KSU
    Reece, Chris G03-Dropped-KSU
    Reece, Jayden G02-Registered-UNG
    Reece, Jayden G02-Withdrawn-UNG
  • To post as a guest, your comment is unpublished.
    Muveen · 2 years ago
    I have in column A

    1 Cast
    2 Crew
    3 Hiring
    4 Cast
    5 Hiring
    6 Crew

    I need these unique CAST CREW AND HIRING in another column without delete in column A entries.

    Ex: I need (after formula)

    1 Cast
    2 Crew
    3 Hiring

    Is it possible by formula?
  • To post as a guest, your comment is unpublished.
    Ilaiyaraja · 3 years ago
    Above Macro only Combine the limited cell(e.g 20 cells) in b column. How to Combine more cells
  • To post as a guest, your comment is unpublished.
    David Greene · 5 years ago
    I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?
    • To post as a guest, your comment is unpublished.
      Admin-jay · 5 years ago
      [quote name="David Greene"]I've found that the "Combine multiple duplicate rows and sum/average the values" feature within KUTools does not work if the numbers in the row have a comma or period. This makes the tool unusable for combining and summing currency fields (which is why I tried the product in first place). I'm currently using the trial version which states that it is full-functioned; is it possible that this works in the paid version?[/quote]
      Sorry, we will fix it in next version.