Hoe splitst u celwaarden verticaal in Excel?
Tijdens het werken in Excel komt u soms situaties tegen waarin meerdere waarden uit één of meer rijen moeten worden omgezet naar een verticale lijst. Dit is vooral handig wanneer gegevens horizontaal zijn opgeslagen, maar in kolomvorm verwerkt of geanalyseerd moeten worden.
In deze handleiding worden drie efficiënte methoden behandeld om celwaarden verticaal om te zetten:
Celwaarden verticaal splitsen in rijen in Excel
- Met een formule (Excel 365)– Ideaal voor dynamische en automatische transformaties
- Met Kutools voor Excel– Een snelle en eenvoudige oplossing met een gespecialiseerde tool voor alle Excel-versies
- Met VBA-code– Ideaal om het proces te automatiseren voor alle Excel-versies
Celwaarden verticaal splitsen in rijen met een formule (Excel 365)
Met Excel 365 kunt u de functies TEXTSPLIT, TEXTJOIN en TRANSPONEREN gebruiken om celwaarden moeiteloos verticaal om te zetten.
Kopieer en plak de volgende formule in een lege cel en druk op Enter. Excel breidt de gegevens automatisch uit over meerdere rijen – zie de schermafbeelding.
=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))
- TEXTJOIN(";", WAAR; A1:A4): Voegt de tekst uit de cellen A1 tot en met A4 samen tot één tekenreeks, gescheiden door puntkomma’s (;).
- TEXTSPLIT(...): Splits de samengevoegde tekenreeks opnieuw in afzonderlijke waarden, met de puntkomma als scheidingsteken.
- TRANSPONEREN(...): Zet de resulterende verticale lijst met waarden om in een horizontale rij – of vice versa, afhankelijk van de oorspronkelijke oriëntatie.
✅Voordelen:
- ✔ Dynamische updates: zodra de brongegevens wijzigen, werkt de formule de resultaten automatisch bij.
- ✔ Geen handmatige inspanning: maakt herhaaldelijk handmatig splitsen overbodig.
- ✔ Aanpasbare scheidingstekens: vervang het puntkommateken (;) door elk gewenst scheidingsteken, zoals een komma of spatie, dat het beste aansluit bij uw gegevens.
❌Nadelen:
- Alleen beschikbaar in Excel 365 – werkt niet in oudere versies van Excel.
Celwaarden verticaal splitsen in rijen met Kutools voor Excel
Als u Excel 2019 of een oudere versie gebruikt, is „Kutools voor Excel” een krachtige invoegtoepassing met gespecialiseerde tools om gegevens eenvoudig te transformeren en te beheren. Met de functie „Splitsen in meerdere regels” zet u celwaarden naadloos verticaal om op basis van elk gewenst scheidingsteken.
Na installatie van „Kutools voor Excel” doet u het volgende:
- Klik op „Kutools” > „Samenvoegen en splitsen” > „Splitsen in meerdere regels”, zie schermafbeelding:
- Geef in het dialoogvenster „Splitsen in meerdere regels” de volgende bewerkingen op:
- Selecteer de cellen die u wilt splitsen;
- Selecteer in het gedeelte „Scheidingsteken” het scheidingsteken dat aangeeft hoe de celinhoud moet worden gesplitst. In dit voorbeeld kies ik „puntkomma”.
- Klik tot slot op de knop „OK”.
Resultaat: de gegevens worden omgezet naar een verticale kolom.
✅Voordelen:
- ✔ Werkt in alle Excel-versies (2010, 2013, 2016, 2019, 2021, 365)
- ✔ Geen ingewikkelde formules of code vereist.
- ✔ Ondersteunt een breed scala aan scheidingstekens.
- ✔ Kutools biedt meer dan 300 tools voor gegevensverwerking, zodat u tijd overhoudt voor andere taken.
❌Nadelen:
- ✘ Vereist installatie van Kutools
Celwaarden verticaal splitsen in rijen met VBA-code
Voor gevorderde gebruikers biedt VBA een krachtige oplossing om het verticaal splitsen van celwaarden volledig te automatiseren. Met de onderstaande VBA-code splitst u de inhoud van cellen moeiteloos over meerdere rijen, gebruikmakend van elk gewenst scheidingsteken.
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op 'Invoegen' > 'Module' en plak de volgende code in het Module-venster.
VBA-code: Celwaarden verticaal splitsen in rijen met een specifiek scheidingsteken
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. Druk vervolgens op de toets „F5” om deze code uit te voeren. Er verschijnt een dialoogvenster waarin u wordt gevraagd de celwaarden te selecteren die u verticaal wilt splitsen, zie schermafbeelding:
4. Klik daarna op de knop „OK”. Er verschijnt nog een dialoogvenster waarin u een cel moet selecteren om het resultaat te plaatsen, zie schermafbeelding:
5. Klik op „OK” en de celwaarden worden gesplitst in een lijst met behulp van een scheidingsteken – zie schermafbeelding:
✅Voordelen:
- ✔ Automatiseert het proces en bespaart tijd
- ✔ Werkt in alle Excel-versies
- ✔ Kan worden aangepast voor verschillende scheidingstekens
❌Nadelen:
- ✘ Vereist basiskennis van VBA-programmering
- ✘ Enigszins complex voor beginners
Het verticaal omzetten van celwaarden in Excel kan op verschillende manieren, elk met hun eigen sterke punten. Door deze methoden te begrijpen, kiest u de beste aanpak voor uw specifieke behoeften en optimaliseert u uw workflow in Excel. Of u nu beginner of gevorderde bent: deze tools en technieken helpen u gegevens effectiever en efficiënter te verwerken. Wilt u nog meer Excel-tips en -trucs ontdekken?Onze website biedt duizenden tutorials om Excel onder de knie te krijgen.
Beste Office-productiviteitshulpmiddelen
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.
- 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