Excel-handleiding: Kolommen, rijen, cellen samenvoegen

Het samenvoegen van kolommen, rijen of cellen wordt vaak gebruikt in ons dagelijkse Excel-werk, bijvoorbeeld het samenvoegen van voornaam en achternaam die in twee kolommen staan tot één kolom om de volledige naam te krijgen, rijen samenvoegen op basis van dezelfde ID en de bijbehorende waarden optellen, een bereik van cellen samenvoegen tot één enkele cel, enzovoort. Deze handleiding geeft een overzicht van alle scenario's voor het samenvoegen van kolommen/rijen/cellen in Excel en biedt verschillende oplossingen.

In deze handleiding maak ik enkele voorbeelden om de methoden uit te leggen. Je kunt de verwijzingen aanpassen naar jouw situatie wanneer je onderstaande VBA-code of formules gebruikt, of je kunt de voorbeelden downloaden om de methoden direct uit te proberen.

Klik om het voorbeeldbestand te downloaden

1 Kolommen/rijen samenvoegen tot één cel

Het samenvoegen van kolommen of rijen tot één cel en het resultaat scheiden met een komma, spatie of andere scheidingstekens zoals in onderstaande schermafbeelding wordt het meest gebruikt in Excel.

Kolommen samenvoegen tot één cel

Rijen samenvoegen tot één cel

1.11 Het ampersand-symbool (&) gebruiken

In Excel wordt het ampersand-symbool (&) meestal gebruikt om teksten samen te voegen.

Voorbeeld: Voornaam (kolom A) en achternaam (kolom B) samenvoegen tot volledige naam

Selecteer een cel waar je het samengevoegde resultaat wilt plaatsen en typ dan een formule zoals deze:

=A2&" "&B2

In de formule wordt & gebruikt om de teksten samen te voegen, A2 en B2 zijn de twee teksten die moeten worden gecombineerd, " " is het scheidingsteken (spatie) dat de twee teksten in de resultaatcel scheidt. Als je een komma als scheidingsteken wilt gebruiken, typ dan een komma tussen dubbele aanhalingstekens ",".

Druk op Enter om het samengevoegde resultaat te krijgen en sleep vervolgens de vulgreep naar beneden om de overige resultaten te genereren.

Voorbeeld: Nummer (rij15) en naam (rij16) samenvoegen tot één cel

Als je rijen wilt samenvoegen tot één cel, wijzig dan de celverwijzingen en het scheidingsteken in de formule naar wens en sleep de vulgreep naar rechts om de samengevoegde resultaten te krijgen.

1.12 De CONCATENATE-functie gebruiken (Excel2016 of eerdere versies)

Als je Excel2016 of eerdere versies gebruikt, kan de CONCATENATE-functie je helpen.

Voor meer informatie over de CONCATENATE-functie, bezoek: CONCATENATE.

Voorbeeld: Namen (kolom F) en adres (kolom G) samenvoegen tot één kolom

Selecteer een cel waar je het samengevoegde resultaat wilt plaatsen en typ dan een formule zoals deze:

=CONCATENATE(F2,",",G2)

In de formule zijn F2 en G2 de twee teksten die moeten worden gecombineerd, "," is het scheidingsteken (komma) dat de twee teksten in de resultaatcel scheidt. Als je een spatie als scheidingsteken wilt gebruiken, typ dan een spatie tussen dubbele aanhalingstekens " ".

Druk op Enter om het samengevoegde resultaat te krijgen en sleep vervolgens de vulgreep naar beneden om de overige resultaten te genereren.

Voor het samenvoegen van rijen, wijzig gewoon de celverwijzingen en het scheidingsteken naar wens en sleep de vulgreep naar rechts.

1.13 De CONCAT-functie of TEXTJOIN-functie gebruiken (Excel2019 of Excel365)

Als je Excel2019 of Excel365 gebruikt, zijn de CONCAT-functie en TEXTJOIN-functie wellicht een betere keuze.

Voor meer informatie over de CONCAT-functie, bezoek: CONCAT.

Het gebruik van de CONCAT-functie is hetzelfde als de CONCATENATE-functie. Om voornaam en achternaam uit twee kolommen samen te voegen tot één kolom, gebruik je de formule als volgt:

=CONCAT(A21," ",B21)

In de formule zijn A21 en B21 de twee teksten die moeten worden gecombineerd, " " is het scheidingsteken (spatie) dat de twee teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan het scheidingsteken tussen dubbele aanhalingstekens.

Druk op Enter om het samengevoegde resultaat te krijgen en sleep vervolgens de vulgreep naar beneden om de overige resultaten te genereren.

In tegenstelling tot het samenvoegen van kolommen, moet je bij het samenvoegen van rijen na het invoeren van de eerste formule de vulgreep naar rechts slepen totdat alle samengevoegde resultaten zijn verkregen.

Voor meer informatie over de TEXTJOIN-functie, bezoek: TEXTJOIN.

Kolommen of rijen samenvoegen met TEXTJOIN:

=TEXTJOIN(",",TRUE,E21:G21))

In de formule is E21:G21 een aaneengesloten bereik dat moet worden gecombineerd. " " is het scheidingsteken (spatie) dat de teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan het scheidingsteken tussen dubbele aanhalingstekens. De logische waarde “TRUE” betekent dat lege cellen worden genegeerd bij het samenvoegen. Als je lege cellen wilt meenemen, vervang TRUE dan door FALSE.

Druk op Enter om het samengevoegde resultaat te krijgen en sleep vervolgens de vulgreep naar beneden om de overige resultaten te genereren.

Lege cellen negeren

Lege cellen meenemen

1.14 Notepad gebruiken (alleen voor het samenvoegen van kolommen)

1. Met Notepad kun je ook kolommen samenvoegen (dit werkt niet voor rijen).

Selecteer het bereik dat je wilt samenvoegen tot één kolom en druk op Ctrl + C om het bereik te kopiëren.

2. Open een Notepad, en druk op Ctrl + V om het gekopieerde bereik te plakken.

3. Selecteer een tab tussen twee teksten in Notepad en druk op Ctrl + H om Vervangen in te schakelen, een tabsymbool is geplaatst in Zoeken naar tekstvak.

4. In het Vervangen door tekstvak, typ het scheidingsteken waarmee je de samengevoegde teksten wilt scheiden en klik vervolgens op Alles vervangen. Sluit vervolgens het Vervangen dialoogvenster.

5. Selecteer nu de teksten in Notepad en druk op Ctrl + C om ze te kopiëren, ga naar Excel, selecteer een cel en druk op Ctrl + V om de samengevoegde resultaten te plakken.

Uitbreiding: Kolommen/rijen samenvoegen tot één cel met een regeleinde als scheidingsteken

Als je kolommen of rijen tot één cel wilt samenvoegen met een regeleinde zoals in onderstaande schermafbeelding:

Allereerst moet je weten dat je in Excel de CHAR() functie kunt gebruiken om tekens te specificeren die lastig zijn om in een formule in te voeren, zoals CHAR(10) voor een regeleinde.

Gebruik vervolgens CHAR(10) in de bovenstaande formules om kolommen of rijen samen te voegen met een regeleinde als scheidingsteken:

Ampersand-symbool:

=A49&CHAR(10)&B49

CONCATENATE-functie:

=CONCATENATE(A49,CHAR(10),B49)

CONCAT-functie

=CONCAT(A49,CHAR(10),B49)

TEXTJOIN-functie

=TEXTJOIN(CHAR(10),TRUE,A49:B49)

Nadat je een van bovenstaande formules hebt ingevoerd, selecteer je de resultaten en klik je op Start > Tekstterugloop.

Nu zijn de kolommen samengevoegd tot één en gescheiden door een regeleinde.

Als je alleen rijen in één kolom tot één cel wilt samenvoegen, kan de Uitvullen-functie in Excel je helpen. Selecteer de kolom met meerdere rijen en klik op Start > Uitvullen > Uitvullen, dan worden de rijen samengevoegd in de bovenste cel van het bereik met een spatie als scheidingsteken.

In dit deel worden methoden besproken om kolommen of rijen samen te voegen tot één cel waarbij lege cellen worden overgeslagen, zoals in onderstaande schermafbeelding:

1.21 De TEXTJOIN-functie gebruiken (Excel2019 of Excel365)

Als je Excel2019 of Excel365 gebruikt, kan de nieuwe functie TEXTJOIN deze taak eenvoudig oplossen.

Voor meer informatie over de TEXTJOIN-functie, bezoek: TEXTJOIN.

Voorbeeld: Naam (kolom A), nummer (kolom B) en domein (kolom C) samenvoegen tot één cel om een e-mailadres te genereren, waarbij sommige nummers leeg kunnen zijn.

Selecteer een cel waarin je het samengevoegde resultaat wilt plaatsen en typ de formule als volgt:

=TEXTJOIN("",TRUE,A2:C2)

In de formule is A2:C2 het bereik met de teksten die moeten worden samengevoegd, "" is het scheidingsteken (geen) dat de teksten in de resultaatcel scheidt. Als je een scheidingsteken wilt gebruiken, typ dan het scheidingsteken tussen dubbele aanhalingstekens, bijvoorbeeld ",". De logische waarde “TRUE” betekent dat lege cellen worden genegeerd bij het samenvoegen. Als je lege cellen wilt meenemen, vervang TRUE dan door FALSE.

Druk op Enter om het eerste resultaat te krijgen en sleep de vulgreep naar beneden of naar rechts om alle resultaten te genereren.

1.22 Het ampersand-symbool (&) gebruiken

Als je Excel2016 of eerdere versies gebruikt, kun je het ampersand-symbool (&) gebruiken om de teksten één voor één te verbinden en handmatig lege cellen over te slaan.

Selecteer een cel waar je het samengevoegde resultaat wilt plaatsen en typ dan een formule zoals deze:

=A10&C10

In de formule wordt & gebruikt om de teksten samen te voegen, A10 en C10 zijn de twee teksten die moeten worden gecombineerd. Als je een komma als scheidingsteken wilt gebruiken, typ dan een komma tussen dubbele aanhalingstekens zoals "," en gebruik & om de teksten te verbinden.

Druk op Enter om het samengevoegde resultaat te krijgen. Wijzig vervolgens de verwijzingen in de formule om het volgende samengevoegde resultaat te krijgen.

1.23 Gedefinieerde functie gebruiken

Voor gebruikers van Excel2016 en eerdere versies, als er meerdere kolommen of rijen moeten worden samengevoegd waarbij lege cellen worden overgeslagen, kun je een VBA gebruiken om een gedefinieerde functie te maken om deze taak snel op te lossen.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

2. Klik op Invoegen > Module om een nieuw module toe te voegen.

3. Kopieer en plak onderstaande code in de nieuwe module en sla deze op.

VBA: Cellen samenvoegen en lege cellen overslaan

Function Concatenatecells(ConcatArea As Range) As String
'updateby Extendoffice
  For Each n In ConcatArea: nn = IIf(n = "", nn & "", nn & n & "_"): Next
  Concatenatecells = Left(nn, Len(nn) - 1)
End Function

4. Ga terug naar het werkblad, selecteer een cel waarin je het samengevoegde resultaat wilt plaatsen en typ de formule

=Concatenatecells(A15:C15)

In de formule is A15:C15 het bereik met de teksten die moeten worden samengevoegd. In de VBA-code geeft "_" het scheidingsteken aan dat wordt gebruikt om de teksten in het samengevoegde resultaat te scheiden. Je kunt het scheidingsteken aanpassen naar wens.

Als je Kutools voor Excel hebt geïnstalleerd, is de functie Rijen/kolommen/cellen combineren en waarden behouden erg handig bij allerlei samenvoegacties.

1. Selecteer de cellen die je wilt samenvoegen en de cellen waarin je het samengevoegde resultaat wilt plaatsen.

2. Klik op Kutools > Samenvoegen & Opsplitsen > Rijen/kolommen/cellen combineren en waarden behouden.

3. Geef in het pop-upvenster de opties op zoals hieronder:

1) Geef aan of je kolommen wilt samenvoegen, rijen wilt samenvoegen of alle cellen tot één wilt samenvoegen.

Kolommen samenvoegen Bijv.	Rijen samenvoegen Bijv.	Samenvoegen tot één cel Bijv.

2) Geef het scheidingsteken op voor de teksten in het samengevoegde resultaat.

3) Geef de locatie op van het samengevoegde resultaat (uitgeschakeld bij de optie Samenvoegen tot één cel)

Als je de optie Kolommen samenvoegen kiest, kun je aangeven of het resultaat in de meest linkse of meest rechtse cel van het geselecteerde bereik moet komen.

De cel aan de linkerkant Bijv.	De cel aan de rechterkant Bijv.

Als je de optie Rijen samenvoegen kiest, kun je aangeven of het resultaat in de bovenste of onderste cel van het geselecteerde bereik moet komen.

De cel erboven Bijv.	De cel eronder Bijv.

4) Geef de bewerking op voor de samengevoegde resultaten.

4. Klik op Ok of Toepassen om het samenvoegen af te ronden.

De inhoud van deze cellen behouden

De inhoud van deze cellen verwijderen

Deze cellen samenvoegen

Voor meer informatie over deze functie, bezoek Kolommen, rijen, cellen samenvoegen en waarden behouden.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Soms wil je misschien twee kolommen samenvoegen als een van de kolommen lege cellen bevat. Stel dat er twee kolommen zijn: kolom A bevat gebruikersnamen en enkele lege cellen, en kolom B bevat namen. Vul nu de lege cellen in kolom A met de bijbehorende inhoud uit kolom B bij het samenvoegen van de twee kolommen, zoals in onderstaande schermafbeelding:

1.41 De IF-functie gebruiken

De IF-functie wordt gebruikt om een specifieke voorwaarde te testen. Hier kun je de IF-functie gebruiken om te testen of een cel leeg is en vervolgens de lege cellen op te vullen met inhoud uit een andere kolom.

Voor meer informatie over de IF-functie, bezoek: IF

Selecteer de bovenste cel van de kolom waarin je het samengevoegde resultaat wilt plaatsen en kopieer of voer onderstaande formule in:

=IF(A2="",B2,A2)

Druk vervolgens op Enter om het eerste resultaat te krijgen en sleep de vulgreep naar beneden om alle resultaten te krijgen.

Nu zijn alleen de lege cellen in kolom A opgevuld met de inhoud uit kolom B.

1.42 VBA gebruiken

Hier is ook een VBA-code die deze taak kan uitvoeren.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande code in de nieuwe module.

VBA: Twee kolommen samenvoegen als er lege cellen zijn

Sub MergebyBlank() 'UpdatebyExtendoffice20220506 Dim xRg1, xRg2, xRgUser As Range Dim xRg As Range Dim xWsh As Worksheet Dim xCount, xFNum As Integer Set xRg1 = Range("A:A") Set xRg2 = Range("B:B") Set xWsh = xRg1.Worksheet Set xRgUser = xWsh.UsedRange Set xRg1 = Intersect(xRgUser, xRg1) Set xWsh = xRg2.Worksheet Set xRgUser = xWsh.UsedRange Set xRg2 = Intersect(xRgUser, xRg2) xCount = xRg1.Count If (xCount > xRg2.Count) Then xCount = xRg2.Count End If For xFNum = 1 To xCount If (xRg1.Item(xFNum).Value = "") Then If (xRg2.Item(xFNum).Value <> "") Then xRg1.Item(xFNum).Value = xRg2.Item(xFNum).Value End If ElseIf (xRg2.Item(xFNum).Value = "") Then If (xRg1.Item(xFNum).Value <> "") Then xRg2.Item(xFNum).Value = xRg1.Item(xFNum).Value End If End If Next End Sub 

In de code zijn A:A en B:B de twee kolommen die worden samengevoegd; pas deze aan naar wens.

3. Druk vervolgens op F5 of klik op Uitvoeren knop, dan wordt kolom A gevuld met de waarde uit kolom B als de waarde in kolom A leeg is.

2 Rijen met dezelfde ID samenvoegen

Stel dat er een tabel is met meerdere kolommen, waarvan één kolom ID-waarden bevat die dubbele items hebben. Deze handleiding biedt methoden om de rijen van de tabel samen te voegen op basis van dezelfde ID en enkele berekeningen uit te voeren.

In dit deel worden methoden gegeven om rijen met dezelfde ID samen te voegen en te scheiden met komma's, zoals in onderstaande schermafbeelding:

2.11 VBA gebruiken

Hier is een VBA-code die deze taak kan uitvoeren

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande code in de nieuwe module.

VBA: Rijen met dezelfde ID samenvoegen

Sub Combine_Rows() 'UpdatebyExtendoffice20220506 Dim xRg As Range Dim xRows As Long Dim I As Long, J As Long, K As Long On Error Resume Next Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8) Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address) If xRg Is Nothing Then Exit Sub xRows = xRg.Rows.Count For I = xRows To 2 Step -1 For J = 1 To I - 1 If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then For K = 2 To xRg.Columns.Count If xRg(J, K).Value <> "" Then If xRg(I, K).Value = "" Then xRg(I, K) = xRg(J, K).Text Else xRg(I, K) = xRg(I, K).Text & "," & xRg(J, K).Text 'here uses comma as separator, you can change it to others as you need End If End If Next xRg(J, 1).EntireRow.Delete I = I - 1 J = J - 1 End If Next Next ActiveSheet.UsedRange.Columns.AutoFit End Sub

3. Druk vervolgens op F5 of klik op Uitvoeren knop, dan verschijnt er een Kutools voor Excel-dialoogvenster waarin je een tabel kunt selecteren waarvan de rijen met dezelfde ID moeten worden samengevoegd.

4. Klik op OK. Nu zijn de geselecteerde tabellen samengevoegd op basis van dezelfde ID.

2.12 De IF-functie gebruiken om hulpkolommen toe te voegen

Als er slechts twee kolommen zijn en je wilt de rijen met dezelfde ID samenvoegen en de waarden in de andere kolom scheiden met een komma, zoals in onderstaande schermafbeelding, kan de IF-functie je helpen.

1. Sorteer de ID van A naar Z. Selecteer de ID-kolom, klik op Gegevens > Sorteren van A naar Z.

2. Vervolgens in het Sorteerwaarschuwing dialoogvenster, vink Paneel Uitvouwen de selectieoptie aan, klik op Sorteren.

Nu zijn dezelfde ID's bij elkaar gesorteerd.

3. Gebruik in de aangrenzende kolom de IF-functie als volgt:

=IF(A17=A18,C17&", "&B18,B18)

In de formule zijn A17 en A18 de twee aangrenzende cellen in de ID-kolom (A17 is de koptekst van de ID-kolom), B18 is de bijbehorende cel van A18. ", " geeft aan dat de waarden met een komma worden gescheiden. Je kunt de verwijzingen en het scheidingsteken aanpassen naar wens.

4. Druk op Enter om het eerste resultaat te krijgen en sleep de vulgreep naar beneden om alle resultaten te krijgen.

5. Ga naar de aangrenzende kolom en typ de formule als volgt:

=IF(A18<>A19,"Samengevoegd","")

In de formule zijn A18 en A19 de twee aangrenzende cellen in de ID-kolom. Als de aangrenzende cellen niet gelijk zijn, wordt "Samengevoegd" weergegeven, anders blijft het leeg.

6. Druk op Enter om het eerste resultaat te krijgen en sleep de vulgreep naar beneden om alle resultaten te krijgen.

7. Selecteer de laatste formulekolom inclusief koptekst en klik op Gegevens > Filteren.

8. Klik op de Filteren knop en vink Samengevoegd selectievakje aan in het vervolgkeuzemenu, klik op OK.

Nu zijn alleen de samengevoegde rijen gefilterd. Kopieer de gefilterde gegevens en plak ze op een andere plek.

Meer informatie over de IF-functie. Bezoek: IF.

Als je Kutools voor Excel hebt geïnstalleerd, kan de functie Geavanceerd samenvoegen van rijen deze taak eenvoudig uitvoeren.

1. Selecteer de tabel en klik op Kutools > Samenvoegen & Opsplitsen > Geavanceerd samenvoegen van rijen.

2. Voer in het dialoogvenster Geavanceerd samenvoegen van rijen het volgende uit:

1) Kies de ID-kolom en stel deze in als Hoofd.

2) Kies de kolom waarvan je de waarden wilt samenvoegen met een scheidingsteken, klik op Samenvoegen en kies een scheidingsteken.

3）klik op Ok.

Nu zijn de rijen samengevoegd op basis van dezelfde ID.

De functie Geavanceerd samenvoegen van rijen zal de oorspronkelijke gegevens wijzigen. Sla de gegevens op als een kopie voordat je deze gebruikt.

Voor meer informatie over deze functie, bezoek Geavanceerd samenvoegen van rijen.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Als je rijen met dezelfde ID wilt samenvoegen en vervolgens de waarden wilt optellen of andere berekeningen wilt uitvoeren zoals in onderstaande schermafbeelding, kunnen onderstaande methoden je helpen.

2.21 De Consolideren-functie gebruiken

Als er slechts twee kolommen zijn, waarvan één kolom teksten (ID) bevat en de andere waarden die moeten worden berekend, zoals optellen, kan de ingebouwde Excel-functie Consolideren je helpen.

1. Selecteer een cel waar je het samengevoegde resultaat wilt plaatsen en klik op Gegevens > Consolideren.

2. Voer in het dialoogvenster Consolideren het volgende uit:

1) Kies de Slimme functies naar wens;

2) Klik op de pijl om de tabel te selecteren;

3) Klik op Toevoegen om het geselecteerde bereik toe te voegen aan de lijst met Alle verwijzingen;

4) Vink de selectievakjes van Bovenste rij en Meest linkse kolom aan;

5) Klik op OK.

Nu is de tabel opgeteld op basis van dezelfde ID.

2.22 VBA gebruiken

Hier is een VBA die ook rijen met dezelfde ID kan samenvoegen en vervolgens waarden optellen.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande VBA-code in de nieuwe module.

VBA: Dubbele rijen samenvoegen en optellen

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. Druk vervolgens op F5 of klik op Uitvoeren knop, dan verschijnt er een dialoogvenster om de tabel te selecteren die je wilt gebruiken, en klik vervolgens op OK.

Nu is het geselecteerde bereik samengevoegd op basis van dezelfde waarden en opgeteld.

De VBA zal de oorspronkelijke gegevens wijzigen. Sla de gegevens op als een kopie voordat je VBA gebruikt.

2.23 Een handige tool gebruiken – Geavanceerd samenvoegen van rijen

Als er meer dan twee kolommen in de tabel zijn die je wilt samenvoegen en berekeningen wilt uitvoeren, bijvoorbeeld drie kolommen: de eerste bevat dubbele productnamen die moeten worden samengevoegd, de tweede bevat winkelnamen die moeten worden samengevoegd en gescheiden door een komma, en de laatste bevat getallen die moeten worden opgeteld op basis van de dubbele rijen in de eerste kolom, zoals in onderstaande schermafbeelding, dan kan de functie Geavanceerd samenvoegen van rijen van Kutools voor Excel je helpen.

1. Selecteer de tabel en klik op Kutools > Samenvoegen & Opsplitsen > Geavanceerd samenvoegen van rijen.

2. Voer in het dialoogvenster Geavanceerd samenvoegen van rijen het volgende uit:

1) Kies de ID-kolom en stel deze in als Hoofd.

2) Kies de kolom waarvan je de waarden wilt samenvoegen met een scheidingsteken, klik op Samenvoegen en kies een scheidingsteken.

3) Kies de kolom waarop je de berekening wilt uitvoeren, klik op Berekenen en kies een berekening.

4）klik op Ok.

Nu zijn de rijen samengevoegd op basis van dezelfde rijen en berekend.

De functie Geavanceerd samenvoegen van rijen zal de oorspronkelijke gegevens wijzigen. Sla de gegevens op als een kopie voordat je deze gebruikt.

Voor meer informatie over deze functie, bezoek Geavanceerd samenvoegen van rijen.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Als er een tabel is met meerdere kolommen, waarvan één kolom enkele dubbele waarden bevat, is het de bedoeling om de aangrenzende rijen in deze kolom met dezelfde waarden samen te voegen zoals in onderstaande schermafbeelding. Hoe kun je dit oplossen?

2.31 VBA gebruiken

In Excel is er geen ingebouwde functie die deze taak direct kan uitvoeren, maar hier is een VBA die het kan oplossen.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande VBA-code in de nieuwe module.

VBA: Aangrenzende rijen met dezelfde waarde samenvoegen

Sub MergeSameCell()
'Updateby Extendoffice
Dim Rng As Range, xCell As Range
Dim xRows As Integer
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
Application.DisplayAlerts = False
xRows = WorkRng.Rows.Count
For Each Rng In WorkRng.Columns
    For i = 1 To xRows - 1
        For j = i + 1 To xRows
            If Rng.Cells(i, 1).Value <> Rng.Cells(j, 1).Value Then
                Exit For
            End If
        Next
        WorkRng.Parent.Range(Rng.Cells(i, 1), Rng.Cells(j - 1, 1)).Merge
        i = j - 1
    Next
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

3. Druk vervolgens op F5 of klik op Uitvoeren knop om deze VBA te activeren, dan verschijnt er een dialoogvenster om de tabel te selecteren die je wilt gebruiken, en klik vervolgens op OK.

Nu zijn de aangrenzende rijen met dezelfde waarden in de eerste kolom samengevoegd in het geselecteerde bereik.

De VBA zal de oorspronkelijke gegevens wijzigen. Sla de gegevens op als een kopie voordat je VBA gebruikt. Deze VBA voegt dezelfde waarden samen in de eerste kolom van de geselecteerde tabel.

2.32 Een handige tool gebruiken – Voeg dezelfde cellen samen

Als je Kutools voor Excel hebt geïnstalleerd, kan de functie Voeg dezelfde cellen samen van Kutools voor Excel deze taak in één stap uitvoeren.

Selecteer de kolom waarvan je dezelfde waarden wilt samenvoegen en klik vervolgens op Kutools > Samenvoegen & Opsplitsen > Voeg dezelfde cellen samen.

Nu zijn de aangrenzende cellen met dezelfde waarden samengevoegd.

Als je de samengevoegde cellen wilt splitsen en de waarden wilt terugplaatsen, kun je de functie Cellen splitsen & Waarden invullen toepassen.

Voor meer informatie over deze functie, bezoek Voeg dezelfde cellen samen.

Voor meer informatie over deze functie, bezoek Cellen splitsen.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download nu.

3 Cellen samenvoegen

Voor het samenvoegen van een bereik met meerdere rijen en kolommen tot één enkele cel, zijn er vier methoden.

Voorbeeld: Bereik A1:C3 samenvoegen

3.11 Het ampersand-symbool (&) gebruiken

In Excel wordt het ampersand-symbool (&) meestal gebruikt om teksten samen te voegen.

Selecteer een cel waarin je het samengevoegde resultaat wilt plaatsen en typ een formule zoals deze:

=A1&", "&B1&", "&C1&", "&A2&", " &B2&", "&C2&", "&A3&", "&B3&", "&C3

In de formule wordt & gebruikt om de teksten samen te voegen, ", " is het scheidingsteken (komma + spatie) dat de teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan een scheidingsteken tussen dubbele aanhalingstekens.

Druk op Enter om het samengevoegde resultaat te krijgen.

3.12 De CONCATENATE-functie gebruiken (Excel2016 of eerdere versies)

Als je Excel2016 of eerdere versies gebruikt, kan de CONCATENATE-functie je helpen.

Voor meer informatie over de CONCATENATE-functie, bezoek: CONCATENATE

Selecteer een cel waarin je het samengevoegde resultaat wilt plaatsen en typ een formule zoals deze:

=CONCATENATE(A1,", ",B1,", ",C1,", ",A2,", ",B2,", ",C2,", ",A3,", ",B3,", ",C3)

In de formule zijn A1, B1…,C3 de teksten die je wilt samenvoegen. ", " is het scheidingsteken (komma + spatie) dat de teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan een scheidingsteken tussen dubbele aanhalingstekens.

Druk vervolgens op Enter om het samengevoegde resultaat te krijgen.

3.13 De CONCAT-functie of TEXTJOIN-functie gebruiken (Excel2019 of Excel365)

Als je Excel2019 of Excel365 gebruikt, zijn de CONCAT-functie en TEXTJOIN-functie wellicht een betere keuze.

Voor meer informatie over de CONCAT-functie, bezoek: CONCAT.

Het gebruik van de CONCAT-functie is hetzelfde als de CONCATENATE-functie. Om voornaam en achternaam uit twee kolommen samen te voegen tot één kolom, gebruik je de formule als volgt:

=CONCAT(A1,", ",B1,", ",C1,", ",A2,", ",B2,", ",C2,", ",A3,", ",B3,", ",C3)

In de formule zijn A1, B1…,C3 de teksten die je wilt samenvoegen. ", " is het scheidingsteken (komma + spatie) dat de teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan een scheidingsteken tussen dubbele aanhalingstekens.

Druk vervolgens op Enter om het samengevoegde resultaat te krijgen.

Voor meer informatie over de TEXTJOIN-functie, bezoek: TEXTJOIN.

Kolommen of rijen samenvoegen met TEXTJOIN:

=TEXTJOIN(", ",TRUE,A1:C3)

In de formule is A1:C3 een aaneengesloten bereik dat moet worden gecombineerd. ", " is het scheidingsteken (komma + spatie) dat de teksten in de resultaatcel scheidt. Als je andere scheidingstekens wilt gebruiken, typ dan het scheidingsteken tussen dubbele aanhalingstekens. De logische waarde “TRUE” betekent dat lege cellen worden genegeerd bij het samenvoegen. Als je lege cellen wilt meenemen, vervang TRUE dan door FALSE.

Druk vervolgens op Enter om het samengevoegde resultaat te krijgen.

Als je een regeleinde als scheidingsteken wilt gebruiken, gebruik dan CHAR(10) in de formule, bijvoorbeeld =TEXTJOIN(CHAR(10),TRUE,A1:C3), en stel de resultaatcel in op Tekstterugloop.

3.14 Kolommen/rijen/cellen samenvoegen tot één cel zonder gegevens te verliezen

Als je Kutools voor Excel hebt geïnstalleerd, kan de functie Rijen/kolommen/cellen combineren en waarden behouden deze taak snel uitvoeren.

1. Selecteer het bereik van cellen dat je tot één cel wilt samenvoegen en klik op Kutools > Samenvoegen & Opsplitsen > Rijen/kolommen/cellen combineren en waarden behouden.

2. Vink in het pop-upvenster Samenvoegen tot één cel aan en geef een scheidingsteken op naar wens, klik vervolgens op Ok.

Nu zijn de cellen samengevoegd tot één cel met een specifiek scheidingsteken. Als de celinhoud te veel is om in de samengevoegde cel weer te geven, kun je op Tekstterugloop onder het Start tabblad klikken om alles zichtbaar te maken.

Voor meer informatie over deze functie, bezoek Kolommen, rijen, cellen samenvoegen en waarden behouden.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Cellen transponeren naar één enkele kolom

Cellen transponeren naar één enkele rij

3.21 Het bereik een naam geven en de INDEX-functie gebruiken (alleen voor een enkele kolom)

Als je het bereik van cellen naar één enkele kolom wilt transponeren, kun je het bereik een naam geven en vervolgens de INDEX-functie gebruiken.

1. Selecteer het bereik van cellen, klik met de rechtermuisknop om het contextmenu te openen en klik op Naam definiëren.

2. In het pop-upvenster Nieuwe Naam dialoogvenster, typ een naam in het Naam tekstvak, klik op OK.

3. Nadat je het bereik een naam hebt gegeven, selecteer je een cel waarin je de getransponeerde gegevens wilt plaatsen en gebruik je de INDEX-functie als volgt:

=INDEX(MyData,1+INT((ROW(A1)-1)/KOLOMMEN(MyData)),MOD(ROW(A1)-1+KOLOMMEN(MyData),KOLOMMEN(MyData))+1)

Voor meer informatie over de INDEX-functie, bezoek hier.

4. Druk op Enter en sleep vervolgens de vulgreep naar beneden om deze formule in te vullen totdat een #VERW!-foutwaarde verschijnt.

5. Verwijder de foutwaarde, dan is het bereik van cellen samengevoegd tot één kolom.

3.22 VBA (alleen voor een enkele kolom)

Voor het samenvoegen van cellen tot één enkele kolom is hier ook een VBA die kan werken.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande VBA-code in de lege module.

VBA: Bereik converteren naar een kolom

Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3. Druk vervolgens op F5 of klik op Uitvoeren knop, er verschijnt een dialoogvenster om een bereik van cellen te selecteren, klik op OK.

4. Er verschijnt een ander dialoogvenster om een cel te selecteren voor het resultaat, klik op OK.

3.23 Een handige tool gebruiken – Bereik transformeren

Als je cellen tot één rij wilt samenvoegen, is er geen ingebouwde functie in Excel die dit ondersteunt. Maar als je Kutools voor Excel hebt geïnstalleerd, ondersteunt de functie Bereik transformeren het converteren van een bereik naar een enkele kolom of rij, en ook het converteren van een rij of kolom naar een bereik.

1. Selecteer het bereik van cellen en klik op Kutools > Bereik > Bereik transformeren.

2. In het Bereik transformeren dialoogvenster, vink Bereik naar enkele kolom of Bereik naar enkele rij optie aan naar wens. Klik op OK.

3. Er verschijnt een dialoogvenster om een cel te selecteren voor het resultaat, klik op OK.

Nu is het bereik van cellen geconverteerd naar een rij of kolom.

Voor meer informatie over deze functie, bezoek Bereik transformeren.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Als er enkele duplicaten zijn in een tabel met meerdere kolommen, hoe kun je de kolommen stapelen tot één kolom zonder duplicaten zoals in onderstaande schermafbeelding?

In dit deel worden drie verschillende methoden gegeven om deze taak uit te voeren.

3.31 Kopiëren en plakken en dubbele waarden verwijderen

In Excel is de algemene methode om deze taak uit te voeren het kopiëren en plakken van de kolommen één voor één en vervolgens de dubbele waarden te verwijderen.

1. Selecteer de eerste kolom en druk op Ctrl + C om deze te kopiëren, selecteer vervolgens een doelcel en druk op Ctrl + V toetsen.

2. Herhaal stap1 om andere kolommen te kopiëren en plak ze onder de eerste kolom.

3. Selecteer vervolgens de gestapelde kolom, klik op Gegevens > Dubbele items verwijderen, vervolgens in het Dubbele items verwijderen dialoogvenster, vink de kolomnaam aan, klik op OK.

4. Nu verschijnt er een dialoogvenster om je te informeren dat de dubbele waarden zijn verwijderd. Klik op OK om het te sluiten, en de gestapelde kolom bevat nu alleen unieke waarden.

Als er honderden kolommen zijn, is het één voor één kopiëren en plakken tijdrovend. Maar als je Kutools voor Excel hebt geïnstalleerd, kan de functie Bereik transformeren het bereik snel naar een kolom converteren, waarna je de functie Dubbele items verwijderen van Excel kunt toepassen.

Selecteer het bereik van kolommen en klik op Kutools > Bereik > Bereik transformeren.

Vink vervolgens de optie Bereik naar enkele kolom aan en klik op OK om een cel te selecteren voor de gestapelde kolom.

En pas vervolgens Dubbele items verwijderen toe om de dubbele waarden te verwijderen.

Voor meer informatie over deze functie, bezoek Bereik transformeren.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een 30-daagse gratis proefperiode van Kutools voor Excel, download het nu.

3.32 VBA gebruiken

Hier is bovendien een VBA-code die deze taak kan uitvoeren.

1. Druk op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen, klik vervolgens op Invoegen > Module om een nieuwe lege module te maken.

2. Kopieer en plak onderstaande code in de nieuwe module.

VBA: Kolommen stapelen tot één zonder duplicaten

Sub FindUniques()
'UpdatebyExtendoffice
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set dic = CreateObject("Scripting.Dictionary")
For j = 1 To InputRng.Columns.Count
    For i = 1 To InputRng.Rows.Count
        xValue = InputRng.Cells(i, j).Value
        If xValue <> "" And Not dic.Exists(xValue) Then
            OutRng.Value = xValue
            dic(xValue) = ""
            Set OutRng = OutRng.Offset(1, 0)
        End If
    Next
Next
End Sub

3. Druk vervolgens op F5 of klik op Uitvoeren knop, dan verschijnt er een dialoogvenster om de kolommen te selecteren die moeten worden gestapeld, klik op OK.

4. In het tweede pop-upvenster selecteer je een doelcel voor de gestapelde kolom en klik je op OK.

Nu zijn de kolommen gestapeld tot één kolom met alleen unieke waarden.

Als er twee kolommen zijn waarvan één een speciale opmaak heeft, zoals een aangepaste datumtijd mm/dd/jjjj, dan wordt bij het samenvoegen van deze twee kolommen met de normale methoden de aangepaste opmaak verwijderd zoals in onderstaande schermafbeelding:

In dit deel worden enkele manieren gegeven om cellen samen te voegen en de opmaak te behouden.

3.41 De TEXT-functie in een formule inbedden

De TEXT-functie wordt gebruikt om een getal om te zetten naar tekst in een specifieke opmaak. Hier kunnen we deze gebruiken om de cel (met een getal) eerst te formatteren en deze vervolgens samen te voegen met andere cellen met “&”, de CONCATENATE-functie, de CONCAT-functie of de TEXTJOIN-functie.

Voor details over het algemeen samenvoegen van cellen tot één, ga terug naar1.1.

Voor meer informatie over de TEXT-functie, bezoek TEXT-functie.

Hier wordt het inbedden van de TEXT-functie in de CONCAT-functie als voorbeeld genomen.

Kopieer en plak onderstaande formule in een cel waarin je het samengevoegde resultaat wilt plaatsen:

=CONCAT(TEXT(A2,"mm/dd/yyyy hh:mm")," ",B2)

In de formule is A2 de cel waarvan je de opmaak wilt behouden, “mm/dd/yyyy hh:mm” is de opmaak die je gebruikt, B2 is de andere cel die wordt samengevoegd. " " geeft aan dat de waarden met een spatie worden gescheiden. Je kunt de verwijzingen, opmaak en het scheidingsteken aanpassen naar wens.

Druk op Enter en sleep de vulgreep naar beneden om de cellen met deze formule te vullen.

3.42 Microsoft Word gebruiken

1. Selecteer de tabel waarvan je de cellen wilt samenvoegen tot één en druk op Ctrl + C om deze te kopiëren.

2. Open een leeg Word document, druk op Ctrl + V om deze te plakken, klik vervolgens op de tabel in het document; nu verschijnt er een kruisje rechtsboven in de tabel.

3. Klik op het Indeling tabblad en klik vervolgens op Converteren naar tekst in de Gegevens groep, in het pop-upvenster Tabel naar tekst converteren dialoogvenster, geef het scheidingsteken op voor de kolommen. Klik op OK.

Nu is de inhoud van de tabel in Word omgezet naar tekst.

4. Selecteer de geconverteerde tekst en druk op Ctrl + C om deze te kopiëren, ga terug naar Excel en selecteer een lege cel, druk op Ctrl + V om het samengevoegde resultaat te plakken.

3.43 Een handige tool gebruiken – Samenvoegen zonder gegevens te verliezen

De meest efficiënte manier is het gebruik van de functie Rijen/kolommen/cellen combineren en waarden behouden van Kutools voor Excel. Je hoeft alleen het selectievakje Opgemaakte waarden gebruiken aan te vinken tijdens het toepassen van de functie, zodat het samengevoegde resultaat de gegevensopmaak behoudt.

1. Selecteer de tabel inclusief de cellen waarin het resultaat wordt geplaatst en klik op Kutools > Samenvoegen & Opsplitsen > Rijen/kolommen/cellen combineren en waarden behouden.

2. Geef in het pop-upvenster de samenvoegbewerking op naar wens en vink het selectievakje Opgemaakte waarden gebruiken uit (standaard is deze optie aangevinkt). Klik op Ok.

Nu zijn de gegevens samengevoegd en is de opmaak behouden.

Voor meer informatie over deze functie, bezoek Kolommen, rijen, cellen samenvoegen en waarden behouden.

Voor meer informatie over Kutools voor Excel, bezoek Kutools voor Excel.

Voor een {module745}-daagse gratis proefperiode van Kutools voor Excel, download het nu.

Stel dat er een tabel is met jaren, maanden en dagen in aparte kolommen. De taak is om de kolommen samen te voegen en een datum te genereren zoals in onderstaande schermafbeelding:

3.51 De DATE-functie gebruiken

De DATE-functie wordt gebruikt om een datum te maken met jaar, maand en dag.

Voor meer informatie over de DATE-functie, bezoek DATE-functie.

Kopieer en plak onderstaande formule in een cel waarin je de datum wilt plaatsen:

=DATE(A2,B2,C2)

In de formule zijn A2, B2 en C2 de cellen met de waarden voor jaar, maand en dag.

Druk op Enter om de eerste datum te krijgen en sleep de vulgreep naar beneden om alle datums te krijgen.

Meer Excel-handleidingen:

---

De Beste Office Productiviteitstools

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

• Super Formulebalk (bewerk eenvoudig meerdere regels tekst en formules); Leeslayout (lees en bewerk eenvoudig grote aantallen cellen); Plakken in gefilterd bereik...
• Cellen/Rijen/Kolommen samenvoegen en gegevens behouden; Celinhoud splitsen; Dubbele rijen combineren en optellen/gemiddelde berekenen... Voorkom dubbele cellen; Bereiken vergelijken...
• Selecteer dubbele of unieke rijen; Selecteer lege rijen (alle cellen zijn leeg); Super Zoeken en Fuzzy Zoeken in veel werkboeken; Willekeurige selectie...
• Exacte kopie van meerdere cellen zonder formuleverwijzing te wijzigen; Automatisch verwijzingen naar meerdere werkbladen maken; Opsommingstekens, selectievakjes en meer invoegen...
• Favoriete en snel formules, bereiken, grafieken en afbeeldingen invoegen; Cellen versleutelen met wachtwoord; Mailinglijst maken en e-mails versturen...
• Tekst extraheren, Tekst toevoegen, Verwijder tekens op een specifieke positie, Spaties verwijderen; Maak en print statistieken per pagina; Converteer tussen celinhoud en opmerkingen...
• Superfilter (filter schema's opslaan en toepassen op andere werkbladen); Geavanceerd sorteren op maand/week/dag, frequentie en meer; Speciaal filteren op vet, cursief...
• Werkboeken en werkbladen combineren; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere werkbladen; Batchconversie xls, xlsx en PDF...
• Draaitabelgroepering op weeknummer, dag van de week en meer... Toon ontgrendelde, vergrendelde cellen met verschillende kleuren; Markeer cellen die een formule/naam bevatten...

Lees meer... Volledige functies 30-daagse gratis proefversie... Aanschaffen... 

---

Office Tab - brengt een tabbladinterface naar Office en maakt uw werk veel gemakkelijker

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

Lees meer... Volledige functies 30-daagse gratis proefversie... Aanschaffen...