Hoe splitst u tekst in afzonderlijke kolommen op basis van hoofdletters in Excel?
Bij het werken met gegevens in Excel komt u mogelijk af en toe cellen tegen die meerdere woorden bevatten die aan elkaar zijn geschreven, waarbij elk woord begint met een hoofdletter — bijvoorbeeld „FirstNameLastName” of „SalesMarchApril”. Voor het zuiveren of analyseren van gegevens wilt u die inhoud mogelijk splitsen in afzonderlijke kolommen bij elke hoofdletter, zoals in de onderstaande schermafbeelding is geïllustreerd. Excel biedt echter geen directe ingebouwde functie om op hoofdletters te splitsen. Welke praktische methoden helpen u om woorden snel en nauwkeurig te scheiden in afzonderlijke kolommen op basis van hoofdletters?
Hieronder vindt u drie effectieve oplossingen voor dit probleem, elk met hun eigen toepasselijke scenario en sterktes:
Tekst splitsen in afzonderlijke kolommen op hoofdletter met formules
Als uw gegevens bestaan uit celwaarden met slechts twee woorden die via hoofdletters aan elkaar zijn geschreven, kunnen Excel-formules u helpen de inhoud eenvoudig te splitsen in afzonderlijke kolommen — zonder code of invoegtoepassingen, en perfect geschikt voor kleinere datasets of minder complexe splitsbehoeften.
1. Voer in een lege cel naast uw gegevens (bijvoorbeeld cel C2) de volgende matrixformule in om het eerste woord uit cel A2 te halen (waarbij A2 de tekst bevat die u wilt splitsen):
=LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1)Nadat u de formule hebt getypt, moet u zeker Ctrl + Shift + Enter tegelijkertijd indrukken. Dit is vereist voor matrixformules in sommige Excel-versies. Als u dit correct doet, verschijnen accolades {} rond uw formule in de formulebalk. De formule werkt door de tweede hoofdletter in uw cel te zoeken en vervolgens alle tekens vóór die positie te extraheren—zodat het eerste woord ontstaat.
2. Selecteer cel C2 en sleep de vulgreep omlaag om de formule op andere rijen toe te passen. Zo worden automatisch de overeenkomstige eerste woorden uit elke rij geëxtraheerd.
3. Voer daarna in de aangrenzende cel (bijvoorbeeld D2) de volgende formule in om de rest van de tekst (het tweede woord) te extraheren:
=REPLACE(A2,1,LEN(C2),"")Deze formule verwijdert het eerste woord dat in de vorige stap is geëxtraheerd, zodat alleen het tweede woord overblijft. Druk gewoon op Enter om te bevestigen.
4. Selecteer op dezelfde manier cel D2 en sleep de formule naar beneden met de vulgreep. De tekst uit elke cel in uw oorspronkelijke bereik is nu gesplitst in twee kolommen, gescheiden op de positie van de hoofdletter.
Ontgrendel de magie van Excel met KUTOOLS AI
- Slimme uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak grafieken — allemaal met eenvoudige opdrachten.
- aangepaste formules: Genereer op maat gemaakte formules om uw workflows te stroomlijnen.
- VBA-programmeren: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules moeiteloos.
- Tekstvertaling: Doorbreek taalbarrières in uw spreadsheets.
Tekst splitsen in afzonderlijke kolommen op hoofdletter met VBA-code
De bovenstaande formule-gebaseerde methode werkt prima als je slechts twee woorden hoeft te splitsen, maar kan geen cellen verwerken met meer dan twee aaneengeschakelde woorden (bijvoorbeeld ‘FirstNameMiddleNameLastName’). In zulke gevallen kun je VBA-code gebruiken om automatisch een spatie in te voegen vóór elke hoofdletter, zodat de woorden duidelijk worden gesegmenteerd. Nadat je deze spaties hebt toegevoegd, gebruik je de ingebouwde Excel-functie Tekst naar kolommen om de tekst over afzonderlijke kolommen te verdelen.
Pas eerst VBA-code toe om spaties in te voegen vóór hoofdletters, zodat de woorden duidelijk worden gescheiden.
1. Druk op ALT + F11 om het venster van de Microsoft Visual Basic for Applications-editor te openen.
2. Klik in de VBA-editor op Invoegen > Module en plak de volgende code in het nieuwe modulevenster.
VBA-code: Spaties invoegen vóór elke hoofdletter in een cel
Function SplitWords(ByVal Str As String) As String
'updateby Extendoffice 20151128
Dim I As Integer
SplitWords = Left(Str, 1)
For I = 2 To Len(Trim(Str))
If (Asc(Mid(Str, I, 1)) > 64) And _
(Asc(Mid(Str, I, 1)) < 91) And _
(Mid(Str, I - 1, 1) <> " ") Then _
SplitWords = SplitWords & " "
SplitWords = SplitWords & Mid(Str, I, 1)
Next
End Function
Nadat u de code hebt getypt of geplakt, sluit u de VBA-editor om terug te keren naar het werkblad. Deze code definieert een nieuwe functie genaamd splitwords die u als een gewone werkbladformule kunt gebruiken. Houd er rekening mee dat macro’s mogelijk moeten worden ingeschakeld om deze functie te gebruiken, en sla uw werkmap op als een .xlsm-bestand om de VBA-code te behouden.
3. Voer in een lege cel naast uw gegevens de volgende formule in om spaties vóór elke hoofdletter in cel A2 in te voegen:
=splitwords(A2)Deze formule roept de door u gedefinieerde functie aan om elke cel te verwerken. Nadat u op Enter hebt gedrukt, ziet u uw tekst met spaties ingevoegd vóór elke hoofdletter – zodat elk woord duidelijk uit elkaar valt.
4. Kopieer deze formule met de vulgreep naar alle relevante cellen, zodat elke rij automatisch op de juiste manier wordt verwerkt.
5. Op dit moment bevatten de cellen formules. Als u alleen de verwerkte tekst wilt behouden zonder de koppeling met de formule, kunt u de waarden elders kopiëren en plakken. Selecteer hiervoor de verwerkte cellen, kopieer ze en klik met de rechtermuisknop op de gewenste locatie. Kies vervolgens 'Plakken speciaal' > 'Waarden'.
Pas vervolgens de functie **Tekst naar kolommen** toe om de celinhoud op basis van spaties te splitsen in afzonderlijke kolommen.
6. Selecteer nu de celwaarden met spaties (de resultaten van de vorige stap). Ga op het lint naar Gegevens > Tekst naar kolommen. Wanneer de wizard Tekst naar kolommen converteren verschijnt (Stap 1), kiest u de optie Gescheiden-keuzerondje.
7. Klik op Volgende en selecteer in stap 2 de optie Spatie onder Scheidingstekens. Hiermee geeft u Excel op spaties te gebruiken als scheidingspunt voor het splitsen van de gegevens in kolommen.
8. Zorg in stap 3 dat Algemeen is geselecteerd als kolomgegevensindeling (of kies een andere indeling indien nodig) en selecteer de cel waar u de gesplitste gegevens wilt laten verschijnen door op 
te klikken. Zorg ervoor dat het doelbereik bestaande gegevens niet overschrijft.
9. Klik op Voltooien en Excel splitst de tekst automatisch in meerdere kolommen, waarbij elke kolom één woord bevat dat oorspronkelijk door een hoofdletter was gescheiden.
Als u een fout tegenkomt waarbij sommige woorden niet zoals verwacht worden gesplitst, controleer dan op uitzonderlijke situaties zoals acroniemen (meerdere hoofdletters achter elkaar) of volgende spaties. Overweeg uw VBA-code te verfijnen of controleer uw gegevens op uitschieters. Vergeet ook niet regelmatig uw werk op te slaan bij het gebruik van VBA of het uitvoeren van batchgegevensbewerkingen.
Deze methode is vooral handig bij inconsistente tekstlengtes of een wisselend aantal woorden per cel. Sommige gebruikers voelen zich echter minder op hun gemak met het uitvoeren van VBA-code; in dat geval kunt u overwegen de alternatieve methoden hieronder te gebruiken.
Tekst splitsen in afzonderlijke kolommen op hoofdletter met Kutools voor Excel
Kutools voor Excel biedt een gebruiksvriendelijke en efficiënte oplossing voor gebruikers van alle vaardigheidsniveaus om tekst te splitsen op hoofdletters—vooral handig bij grote datasets of herhaalde taken. Door de functies Tekst toevoegen en Cellen splitsen te combineren, voltooit u deze bewerking met minimale inspanning en risico.
1. Selecteer de cellen met de oorspronkelijke gegevens die u wilt splitsen.
2. Klik op Kutools > Tekst > Tekst toevoegen. Met deze tool kunt u een teken of scheidingsteken – zoals een spatie – invoegen vóór elke hoofdletter.
3. Typ in het dialoogvenster Tekst toevoegen een spatie (of een ander scheidingsteken indien nodig) in het invoervak Tekst. Selecteer vervolgens in de sectie Alleen toevoegen aan de optie 1e letter is hoofdletter. Hiermee geeft u Kutools op het gekozen scheidingsteken vóór elke hoofdletter in de geselecteerde cellen in te voegen.
4. Klik op OK. Kutools voegt automatisch spaties in vóór elke hoofdletter en maakt uw gegevens direct klaar voor splitsen.
5. Selecteer vervolgens nog steeds het verwerkte bereik en ga naar Kutools > Samenvoegen en splitsen > Cellen splitsen om de tekst op basis van scheidingstekens in kolommen te splitsen.
6. In het dialoogvenster Cellen splitsen kiest u Splitsen naar kolommen onder de sectie Type en vinkt u het vakje Spatie (of een ander eerder toegevoegd scheidingsteken) aan om aan te geven waar de splitsingen moeten plaatsvinden.
7. Klik op OK. Er verschijnt een melding waarin u de begincel voor de gesplitste resultaten kunt kiezen. Geef het doel zorgvuldig op en zorg dat er voldoende ruimte is voor de gesplitste kolommen.
8. Klik ten slotte op OK om de splitsbewerking te voltooien. Uw gegevens worden nu efficiënt en nauwkeurig verdeeld over afzonderlijke kolommen bij elke hoofdletter.
Deze methode is ideaal voor complexe, grote of regelmatig bijgewerkte gegevens en voorkomt handmatige aanpassingen van formules of code. Onthoud dat Kutools voor Excel uw efficiëntie verhoogt bij zowel alledaagse als geavanceerde taken, dankzij tal van extra functies.
Download nu de gratis proefversie van Kutools voor Excel!
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