Hoe tekst in afzonderlijke kolommen splitsen op basis van hoofdletters in Excel?

Stel dat je een reeks gegevens hebt die je wilt splitsen in celinhoud naar afzonderlijke kolommen op basis van de hoofdletter, zoals in de onderstaande schermafbeelding te zien is. Heb je goede ideeën om dit probleem in Excel op te lossen?

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met formules

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met VBA-code

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met Kutools voor Excel

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met formules

Als er slechts twee woorden in je cellen staan, helpen de volgende formules je om deze taak te voltooien. Doe het volgende:

1. Voer deze matrixformule in: =LINKS(A2,KLEINSTE(VIND.SPEC(TEKEN(RIJ(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) (A2 is de cel die je wilt splitsen op basis van hoofdletters) in een lege cel naast je gegevens, en druk vervolgens tegelijkertijd op Ctrl + Shift + Enter om het eerste woord te krijgen, zie onderstaande schermafbeelding:

2. Selecteer dan C2 en sleep de vulgreep omlaag naar de cellen waarop je deze formule wilt toepassen. Alle eerste woorden van de bereikcellen zijn in één keer geëxtraheerd, zie onderstaande schermafbeelding:

3. Ga verder met het invoeren van een andere formule: =VERVANGEN(A2,1,LENGTE(C2),"") (A2 is de cel die je wilt splitsen, en C2 is de cel die het eerste woord bevat dat je hebt geretourneerd) in cel D2, en druk op Enter om het tweede woord te krijgen, zie onderstaande schermafbeelding:

4. Selecteer cel D2, sleep de vulgreep omlaag naar de cellen om het tweede woord te krijgen, en de celinhoud van het bereik is gesplitst in twee kolommen op basis van de hoofdletter, zie onderstaande schermafbeelding:

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.

Verhoog uw Excel-mogelijkheden met AI-aangedreven tools. Download Nu en ervaar een ongekende efficiëntie!

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met VBA-code

De bovenstaande formules zijn alleen van toepassing op celwaarden die twee woorden bevatten. Als er meerdere woorden in een cel moeten worden gesplitst, kun je spaties toevoegen vóór de hoofdletters en vervolgens de functie Tekst naar Kolommen gebruiken om de celinhoud in afzonderlijke kolommen te splitsen op basis van spaties.

Voeg eerst met VBA-code spaties toe vóór de hoofdletter om de woorden te scheiden.

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 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

3. Sla deze code op en sluit deze, ga terug naar het werkblad en voer deze formule in: =splitwords(A2) in een lege cel naast je gegevens, zie onderstaande schermafbeelding:

4. Sleep dan de vulgreep omlaag naar de cellen waarop je deze formule wilt toepassen, en de spaties zijn ingevoegd vóór elke hoofdletter om de celinhoud te scheiden, zie onderstaande schermafbeelding:

5. Kopieer en plak deze formulecellen vervolgens als waarden om de formules te verwijderen op een andere plaats of in het originele bereik.

Pas vervolgens de functie Tekst naar Kolom toe om de celinhoud in afzonderlijke kolommen te splitsen op basis van de spatie.

6. Selecteer de celwaarden waar je spaties hebt ingevoegd en klik op Gegevens > Tekst naar Kolommen. In Stap 1 van de Wizard Tekst naar Kolommen, selecteer de optie Gescheiden, zie onderstaande schermafbeelding:

7. Klik vervolgens op de knop Volgende. In Stap 2 van de wizard, vink de optie Spatie aan onder de sectie Scheidingstekens, zie onderstaande schermafbeelding:

8. Ga door met klikken Volgende knop, in Stap 3 van de wizard, kies Algemeen optie onder de Kolomgegevensindeling, en selecteer vervolgens een cel waar je de gesplitste waarden wilt plaatsen door te klikken knop, zie onderstaande schermafbeelding:

9. Klik ten slotte op de knop Voltooien, en de celinhoud is gesplitst in meerdere kolommen zoals in de onderstaande schermafbeelding te zien is:

Tekst splitsen in afzonderlijke kolommen op basis van hoofdletters met Kutools voor Excel

Als je Kutools voor Excel hebt, kun je door de functies Tekst Toevoegen en Cellen Splitsen te combineren deze taak eenvoudig en comfortabel uitvoeren. Doe het volgende:

1. Selecteer de originele gegevens die je wilt splitsen.

2. Klik vervolgens op Kutools > Tekst > Tekst Toevoegen, zie onderstaande schermafbeelding:

3. Voer in het dialoogvenster Tekst Toevoegen eenmaal de spatiebalk in of elk ander scheidingsteken dat je nodig hebt in het Tekstvak, en kies vervolgens 1e letter is hoofdletter in de sectie Alleen toevoegen aan, zie onderstaande schermafbeelding:

4. Klik vervolgens op de knop OK, en spaties zijn toegevoegd vóór elke hoofdletter, zie onderstaande schermafbeelding:

5. Pas vervolgens het hulpprogramma Cellen Splitsen van Kutools voor Excel toe om de celwaarden te splitsen op basis van spaties. Houd het gegevensbereik geselecteerd en klik op Kutools > Samenvoegen & Splitsen > Cellen Splitsen, zie onderstaande schermafbeelding:

6. Selecteer in het dialoogvenster Cellen Splitsen de optie Verdeel Gegevens onder de sectie Type, en vink Spatie of andere scheidingstekens aan die je in Stap 3 hebt toegevoegd, zie onderstaande schermafbeelding:

7. Klik vervolgens op OK, en er verschijnt een pop-upvenster om je eraan te herinneren een cel te selecteren om de gesplitste gegevens te plaatsen, zie onderstaande schermafbeelding:

8. Klik ten slotte op de knop OK, en je krijgt het resultaat dat je nodig hebt, zie onderstaande schermafbeelding:

Download en probeer Kutools voor Excel nu gratis uit!