Hoe tekst in aparte kolommen splitsen op basis van hoofdletters in Excel?
Bij het werken met gegevens in Excel, kom je soms cellen tegen die meerdere woorden bevatten die aan elkaar geschreven zijn, waarbij elk woord begint met een hoofdletter, bijvoorbeeld "VoornaamAchternaam" of "VerkoopMaartApril". Voor het opschonen of analyseren van gegevens moet je de inhoud mogelijk splitsen in afzonderlijke kolommen bij elke hoofdletter, zoals te zien is in onderstaande schermafbeelding. Echter, Excel biedt geen direct ingebouwde functie om dit te doen op basis van hoofdletters. Welke praktische benaderingen kunnen helpen om snel en nauwkeurig de woorden in afzonderlijke kolommen te splitsen op basis van hoofdletters?
Hieronder vind je drie effectieve oplossingen voor dit probleem, elk met hun eigen toepassingsgebied en sterke punten:
Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met formules
Als jouw gegevens bestaan uit celwaarden die slechts twee woorden bevatten die door hoofdletters aan elkaar zijn geschreven, kunnen Excel-formules helpen om de inhoud te splitsen in afzonderlijke kolommen. Deze oplossing is eenvoudig, vereist geen code of invoegtoepassingen, en is geschikt voor kleinere datasets of minder complexe splitsingsbehoeften.
1. Voer in een lege cel naast je gegevens (bijvoorbeeld cel C2) de volgende matrixformule in om het eerste woord uit cel A2 te extraheren (waar A2 de tekst bevat die gesplitst moet worden):
=LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1)Nadat je de formule hebt getypt, druk je tegelijkertijd op Ctrl + Shift + Enter. Dit is vereist voor matrixformules in sommige Excel-versies. Als dit correct wordt gedaan, verschijnen accolades {} rond je formule in de formulebalk. Deze formule werkt door de tweede hoofdletter in je cel te zoeken en vervolgens alle tekens vóór die positie te extraheren, wat resulteert in het eerste woord.
2. Selecteer cel C2 en sleep de vulgreep naar beneden om de formule toe te passen op andere rijen. Automatisch worden de eerste woorden voor elke rij geëxtraheerd.
3. Typ vervolgens in de cel ernaast (bijvoorbeeld D2) de volgende formule 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, waardoor alleen het tweede woord overblijft. Druk gewoon op Enter om te bevestigen.
4. Selecteer cel D2 en gebruik de vulgreep om deze formule omlaag te kopiëren naar andere rijen. De tekst van elke cel in je oorspronkelijke bereik zal nu worden gesplitst in twee kolommen, gescheiden door de positie van de hoofdletter.
Ontdek de Magie van Excel met Kutools AI
- Slimme Uitvoering: Voer celbewerkingen uit, analyseer gegevens en maak diagrammen – allemaal aangestuurd door eenvoudige commando's.
- Aangepaste Formules: Genereer op maat gemaakte formules om uw workflows te versnellen.
- VBA-codering: Schrijf en implementeer VBA-code moeiteloos.
- Formule-uitleg: Begrijp complexe formules gemakkelijk.
- Tekstvertaling: Overbrug taalbarrières binnen uw spreadsheets.
Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met VBA-code
De bovenstaande methode op basis van formules is geschikt voor gevallen waarin slechts twee woorden moeten worden gesplitst, maar kan niet omgaan met cellen die meer dan twee aaneengeschakelde woorden bevatten (bijv., 'VoornaamTussenvoegselAchternaam'). In dergelijke gevallen kun je VBA-code gebruiken om automatisch een spatie in te voegen vóór elke hoofdletter, waardoor de woorden worden gesegmenteerd. Nadat je deze spaties hebt toegevoegd, kun je de ingebouwde functie Tekst naar Kolommen in Excel gebruiken om de tekst in afzonderlijke kolommen te splitsen.
Eerst pas je VBA-code toe om spaties vóór de hoofdletter toe te voegen om de woorden te scheiden.
1. Druk op ALT + F11 om het venster 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: Voeg spaties in 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
Sluit na het typen of plakken van de code de VBA-editor om terug te keren naar het werkblad. Deze code definieert een nieuwe functie genaamd splitwords die je kunt gebruiken als een normale werkbladformule. Houd er rekening mee dat het mogelijk nodig is om macro's in te schakelen om deze functie te gebruiken, en je moet je werkmap opslaan als een .xlsm-bestand om de VBA-code te behouden.
3. Voer in een lege cel naast je gegevens de volgende formule in om spaties in te voegen vóór elke hoofdletter in cel A2:
=splitwords(A2)Deze formule roept de door de gebruiker gedefinieerde functie aan om elke cel te verwerken. Na het indrukken van Enter zie je je tekst met spaties ingevoegd vóór elke hoofdletter, waardoor individuele woorden duidelijk worden.
4. Kopieer deze formule omlaag voor alle relevante cellen met behulp van de vulgreep, zodat elke rij dienovereenkomstig wordt verwerkt.
5. Op dit moment bevatten de cellen formules. Je kunt ervoor kiezen om de waarden elders te kopiëren en plakken om alleen de verwerkte tekst te behouden, zonder de formulekoppeling. Selecteer hiervoor de verwerkte cellen, kopieer ze, klik met de rechtermuisknop en kies 'Plakken Speciaal' > 'Waarden' op een gewenste locatie.
Pas vervolgens de functie Tekst naar Kolommen toe om de celinhoud te splitsen in afzonderlijke kolommen op basis van de spatie.
6. Selecteer nu de celwaarden die spaties bevatten (de resultaten uit de vorige stap). Ga in het lint naar Gegevens > Tekst naar Kolommen. Wanneer de Wizard Tekst naar Kolommen verschijnt (Stap1), kies je de optie Gescheiden.
7. Klik op Volgende, en selecteer in Stap2 de optie Spatie onder Scheidingstekens. Dit vertelt Excel om spaties te gebruiken als het scheidingpunt voor het splitsen van de gegevens in kolommen.
8. Zorg in Stap3 ervoor dat Algemeen is geselecteerd voor het kolomgegevensformaat (of kies een ander formaat indien nodig), en selecteer de cel waar je wilt dat de gesplitste gegevens verschijnen door te klikken 
. Zorg ervoor dat het doelbereik geen bestaande gegevens overschrijft.
9. Klik op Voltooien, en Excel zal de tekst splitsen in meerdere kolommen, elk vertegenwoordigend een woord dat oorspronkelijk werd gescheiden door een hoofdletter.
Als je 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 je VBA-code te verfijnen of je data te controleren op uitschieters. Vergeet ook niet regelmatig je werk op te slaan wanneer je VBA gebruikt of batchgegevensbewerkingen uitvoert.
Deze methode is vooral handig bij het omgaan met inconsistente tekstlengte of variërende aantallen woorden per cel. Sommige gebruikers voelen zich echter minder op hun gemak bij het uitvoeren van VBA-code, in welk geval je onderstaande alternatieve methoden kunt overwegen.
Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters 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 nuttig voor grote datasets of herhalende taken. Door zijn functies Toevoegen Tekst en Cellen Splitsen samen te gebruiken, kun je de bewerking met minimale inspanning en risico voltooien.
1. Selecteer de cellen met de originele gegevens die je wilt splitsen.
2. Klik op Kutools > Tekst > Toevoegen Tekst. Dit hulpprogramma helpt je een teken of scheidingsteken - zoals een spatie - in te voegen vóór elke hoofdletter.
3. Typ in het dialoogvenster Toevoegen Tekst een spatie (of een ander scheidingsteken indien nodig) in het Tekstinvoervak. Selecteer vervolgens onder Alleen toevoegen aan sectie de optie 1e letter is hoofdletter. Dit vertelt Kutools om je gekozen scheidingsteken vóór elke hoofdletter in de geselecteerde cellen toe te voegen.
4. Klik op OK. Kutools voegt automatisch spaties toe vóór elke hoofdletter, waardoor je gegevens onmiddellijk klaar zijn voor splitsen.
5. Selecteer vervolgens met het nog steeds geselecteerde bereik, ga naar Kutools > Samenvoegen & Splitsen > Cellen Splitsen om te beginnen met het splitsen van de tekst in kolommen op basis van scheidingstekens.
6. Kies in het dialoogvenster Cellen Splitsen onder de sectie Type de optie Splitsen naar Kolommen, en vink de optie Spatie (of welk scheidingsteken eerder is toegevoegd) aan om aan te geven waar de splitsingen moeten plaatsvinden.
7. Klik op OK. Er verschijnt een prompt waarin je de startcel voor de gesplitste resultaten kunt kiezen. Specificeer de bestemming zorgvuldig en zorg ervoor dat er voldoende ruimte is voor de gesplitste kolommen.
8. Klik ten slotte op OK om de splitsbewerking te voltooien. Je gegevens worden nu verdeeld over afzonderlijke kolommen bij elke hoofdletter, efficiënt en nauwkeurig.
Deze methode is ideaal voor complexe, grote of vaak bijgewerkte gegevens, en helpt om handmatige formuleaanpassingen of codering te vermijden. Onthoud dat Kutools voor Excel zijn bruikbaarheid uitbreidt met veel andere functies, wat grotere efficiëntie biedt bij zowel algemene als geavanceerde taken.
Download en probeer Kutools voor Excel nu gratis uit!
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen 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.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen