KutoolsforOffice — Eén oplossing, vijf krachtige tools.Meer bereiken met minder moeite.

Hoe verwijdert u het eerste of laatste woord uit een tekstreeks in een cel?

AuteurXiaoyang Wijzigingsdatum

Bij dagelijks Excel-werk komt het vaak voor dat u lijsten of zinnen moet beheren waarbij u tekstgegevens wilt opschonen. Een veelvoorkomende taak is het verwijderen van het eerste of laatste woord uit een tekstreeks in een cel. U heeft bijvoorbeeld mogelijk een kolom met Volledige naam of gedetailleerde beschrijvingen, maar voor analyse wilt u alleen alles behouden behalve het eerste of laatste woord. Zoals in onderstaande schermafbeelding wordt weergegeven, biedt Excel zelf geen ingebouwde, directe functie voor deze bewerking. Er zijn echter verschillende praktische methoden die u efficiënt kunt gebruiken om dit te bereiken, waaronder formules, Excel-functies en VBA-code. Deze handleiding introduceert meerdere benaderingen om dit probleem op te lossen en helpt u de meest geschikte methode te kiezen voor verschillende scenario’s.

een schermafbeelding die de oorspronkelijke tekstreeks en de resulterende tekstreeks toont met het eerste of laatste woord verwijderd

Inhoud:

Eerste of laatste woord uit een tekstreeks verwijderen met formules

Het gebruik van Excel-formules biedt een eenvoudige, codevrije manier om het eerste of laatste woord uit een cel te verwijderen. Deze methode is geschikt wanneer u een dynamische aanpak nodig hebt die automatisch wordt bijgewerkt als de Oorspronkelijke Tekst verandert. Houd er echter rekening mee dat deze formules ervan uitgaan dat woorden door enkele spaties worden gescheiden en dat er geen voorafgaande, afsluitende of meervoudige opeenvolgende spaties in de tekst staan. Controleer de opmaak van uw gegevens voordat u deze oplossingen toepast.

Het eerste woord uit een tekstreeks verwijderen:

1. Voer deze formule in een lege cel in waar u het resultaat wilt weergeven (bijvoorbeeld cel B2):

=RIGHT(A2,LEN(A2)-FIND(" ",A2))

Hierbij is A2 de cel met uw oorspronkelijke tekstreeks. Deze formule zoekt de eerste spatie, verwijdert het eerste woord inclusief die spatie en retourneert alleen de resterende tekst.

een schermafbeelding die laat zien hoe u een formule gebruikt om het eerste woord uit een tekstreeks te verwijderen

2. Nadat u de formule hebt bevestigd, sleept u de vulgreep omlaag om deze toe te passen op andere cellen in de kolom, indien nodig. U ziet nu dat het eerste woord uit elke tekstreeks is verwijderd, zoals hieronder wordt weergegeven:

een schermafbeelding die alle tekstreeksen toont met het eerste woord verwijderd

Tips:Als er extra spaties aan het begin van uw tekst kunnen staan (Voorafgaande spaties), wordt aanbevolen om de functie SPATIES.WISSENte gebruiken om de gegevens op te schonen voordat u bovenstaande formule toepast, bijvoorbeeld:

=RIGHT(TRIM(A2),LEN(TRIM(A2))-FIND(" ",TRIM(A2)))

Dit zorgt ervoor dat de formule nauwkeurig blijft, zelfs als sommige cellen inconsistente spaties bevatten.

Het laatste woord uit een tekstreeks verwijderen:

Gebruik de volgende formule om het laatste woord uit een cel te verwijderen. Voer deze in een cel zoals B2:

=LEFT(TRIM(A2),FIND("~",SUBSTITUTE(A2," ","~",LEN(TRIM(A2))-LEN(SUBSTITUTE(TRIM(A2)," ",""))))-1)

Deze formule werkt door de positie van de laatste spatie te bepalen en alle tekst ervóór te extraheren. Zorg ervoor dat er geen overbodige spaties tussen woorden staan, of gebruik de functie SPATIES.WISSEN zoals hierboven beschreven. Nadat u de formule hebt ingevoerd, sleept u de vulgreep om deze toe te passen op zoveel rijen als nodig zijn. Zo worden alle laatste woorden in de kolom verwijderd, zoals hieronder wordt gedemonstreerd:

een schermafbeelding die laat zien hoe u een formule gebruikt om het laatste woord uit tekstreeksen te verwijderen

Foutmelding: Als een cel slechts één woord bevat en geen spaties, geven deze formules een foutmelding of een lege waarde terug. Als uw gegevens dergelijke gevallen kunnen bevatten, kunt u de formule insluiten met ALS.FOUT om fouten te voorkomen, bijvoorbeeld:

=IFERROR(RIGHT(A2,LEN(A2)-FIND(" ",A2)),"")

Eerste of laatste woord verwijderen met ‘Tekst naar kolommen’ (ingebouwde Excel-methode)

In sommige gevallen—met name bij het verwerken van kortere of statische datasets—biedt de ingebouwde functie Tekst naar kolommen een intuïtieve, visuele aanpak om woorden uit elkaar te halen. Deze methode is ideaal als u snel alle woorden uit een tekstreeks in kolommen wilt splitsen en ze daarna selectief opnieuw wilt samenvoegen (bijvoorbeeld zonder het eerste of laatste woord). Hoewel deze methode de tekst niet automatisch bijwerkt wanneer de brondcel verandert—dus niet dynamisch is zoals formules—is ze uiterst handig voor eenmalige opschoningsacties.

Stappen:

  • 1.Selecteer de kolom met de tekstgegevens die u wilt splitsen.
  • 2. Ga naar het tabblad Gegevens en klik op Tekst naar kolommen.
  • 3. Kies in de wizard Gescheiden, en klik vervolgens op Volgende.
  • 4. Schakel alleen het scheidingsteken Spatie in en klik op Volgende.
  • 5. Kies de bestemming voor het opsplitsen van gegevens en klik op Voltooien.
  • 6. Na het splitsen worden de kolommen gevuld met afzonderlijke woorden uit elke cel. Om het eerste woord te verwijderen, voegt u eenvoudigweg alle kolommen behalve de eerste samen met behulp van SAMENVOEGEN of TEKST.SAMENV (indien beschikbaar). Op dezelfde manier verwijdert u het laatste woord door alle kolommen behalve de laatste kolom samen te voegen.

U kunt een formule zoals de volgende gebruiken (ervan uitgaande dat uw Gegevens opsplitsen zich nu in kolommen B, C, D bevindt voor één cel):

=CONCATENATE(C2," ",D2)

Als u veel kolommen moet samenvoegen en u beschikt over Excel 2016 of nieuwer, gebruik dan:

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

Waarschuwingen: De methode Tekst naar kolommen overschrijft bestaande gegevens rechts van het geselecteerde bereik als u niet voorzichtig bent. Zorg er daarom altijd voor dat de aangrenzende kolommen leeg zijn, of kopieer uw gegevens eerst naar een leeg gebied voor de veiligheid. Deze methode is het meest geschikt voor snelle, handmatige verwerking in plaats van geautomatiseerde updates.

Toepassingsanalyse: Ideaal voor snelle, handmatige bewerkingen met korte lijsten of wanneer u uw resultaten visueel wilt controleren en corrigeren. Minder geschikt voor grote, dynamische datasets waar automatisering gewenst is.

Eerste of laatste woord uit een tekstreeks verwijderen met VBA-macro

Voor geavanceerdere of herhaalde bulkbewerkingen—zoals het opschonen van grote datasets, het automatiseren van verwijderingen of het verwerken van complexe scenario’s—is een VBA-macro uiterst efficiënt. Met VBA verwijdert u in slechts enkele klikken het eerste of laatste woord uit een volledig celbereik. Zorg er daarom voor dat uw gegevens vóór het uitvoeren van de macro geen abnormale spaties of speciale niet-afbrekende spaties bevatten, aangezien deze de nauwkeurigheid van het splitsen kunnen beïnvloeden.

Hoe u deze VBA-code gebruikt:

1. Klik op Ontwikkelaar > Visual Basic om de editor Microsoft Visual Basic for Applications te openen. Klik in het nieuwe venster op Invoegen > Module. Plak een van de volgende codes in de module.

Het eerste woord uit geselecteerde cellen verwijderen:

Sub RemoveFirstWord()
    Dim WorkRng As Range
    Dim Rng As Range
    Dim arr As Variant
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select range to remove first word", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        If InStr(Rng.Value, " ") > 0 Then
            arr = Split(Rng.Value, " ")
            Rng.Value = Mid(Rng.Value, InStr(Rng.Value, " ") + 1)
        End If
    Next
End Sub

2. Druk op F5 of klik op Uitvoeren om de code uit te voeren. De macro opent vervolgens een dialoogvenster waarin u de cellen kunt selecteren die u wilt verwerken. Klik op OK om uw cellen direct bij te werken door het eerste woord uit elke geselecteerde cel te verwijderen.

Het laatste woord uit geselecteerde cellen verwijderen:

Gebruik de volgende VBA-code om het laatste woord uit de geselecteerde cellen te verwijderen.

Sub RemoveLastWord()
    Dim WorkRng As Range
    Dim Rng As Range
    Dim arr As Variant
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select range to remove last word", xTitleId, WorkRng.Address, Type:=8)
    For Each Rng In WorkRng
        If InStr(Rng.Value, " ") > 0 Then
            arr = Split(Rng.Value, " ")
            Rng.Value = Left(Rng.Value, Len(Rng.Value) - Len(arr(UBound(arr))) - 1)
        End If
    Next
End Sub

Voorzorgsmaatregelen: Deze macro’s verwijderen alleen het eerste of laatste woord in elke cel van uw selectie, gescheiden door spaties. Als een cel slechts één woord bevat (dus geen spaties), blijft die ongewijzigd. Werk altijd op een kopie van uw gegevens of sla uw werkmap op voordat u VBA-code uitvoert—wijzigingen kunnen namelijk niet ongedaan worden gemaakt.

Voordelen: Met VBA voert u bulkverwerking razendsnel uit en automatiseert u herhalende opschoningsactiviteiten zeer effectief—vooral bij het verwerken van grote gegevenstabellen.

Probleemoplossing:Als u „runtimefout"-meldingen tegenkomt, controleer dan of alle waarden in uw selectie als tekst zijn opgemaakt. Lege cellen of foutwaarden kunnen ervoor zorgen dat de macro overslaat of stopt.

Ongeacht de methode die u kiest—formules, Tekst naar kolommen of VBA—raadt u aan uw resultaten altijd te controleren op gegevensconsistentie, vooral wanneer de tekst extra spaties, leestekens of onverwachte woordvolgordes kan bevatten. Maak indien mogelijk altijd een back-up van uw oorspronkelijke gegevens, zeker bij bulkbewerkingen of het gebruik van onbekende macro’s. Als u flexibelere of robuustere oplossingen zoekt voor het opschonen of splitsen van tekst in Excel, biedt Kutools voor Excel een uitgebreide reeks hulpmiddelen die allerlei uitdagingen rondom het splitsen en opmaken van tekst aanpakken—zonder complexe formules of code.

Celwaarden splitsen in meerdere kolommen en rijen met een specifiek scheidingsteken:

Met het Kutools voor Excel-hulpprogramma Cellen splitsen kunt u een tekstreeks in een cel razendsnel splitsen in meerdere kolommen of rijen op basis van spaties, komma’s, nieuwe regels of elk ander door u opgegeven scheidingsteken.

een schermafbeelding die laat zien hoe u Kutools for Excel gebruikt om cellen eenvoudig te splitsen in meerdere rijen of kolommen met een bepaald scheidingsteken

Kutools voor Excel: met meer dan 300 handige Excel-add-ins, gratis te proberen zonder beperkingen gedurende 30 dagen.Download en gratis proefversie nu!

Gerelateerd artikel:

Hoe verwijdert u de eerste, laatste of specifieke tekens uit tekst in Excel?

Beste Office-productiviteitshulpmiddelen

🤖KUTOOLS AI Assistant: Revolutioneer Data-analyse op basis van:Intelligente uitvoering   |  Genereer code|  Maak aangepaste formules  |  Analyseer gegevens en genereer grafieken|  Roep Verbeterde functies aan…
Populaire functies:Zoeken, markeren of Dubbele waarden markeren   |  Verwijder lege rijen   |  Kolommen samenvoegen of cellen zonder gegevensverlies   |   Afronden zonder formule...
Super ZOEKEN:VLookup met meerdere criteria  |  VLookup met meerdere waarden  |   VLookup over meerdere werkbladen   |   Fuzzy Match....
Geavanceerde keuzelijst:Snel een keuzelijst maken   |  Afhankelijke keuzelijst   |  Keuzelijst met meervoudige selectie....
Kolombeheerder:Voeg een specifiek aantal kolommen toe|Verplaats kolommen|Wissel zichtbaarheidsstatus van verborgen kolommen|Vergelijk bereiken en kolommen...
Uitgelichte functies:Rasterfocus   |  Ontwerpweergave   |Verbeterde formulebalk   | Werkmap- en bladbeheerder   |  Bronnenbibliotheek(Automatische tekst)|  Datumkiezer   |  Werkbladen samenvoegen  |  Versleutelen/Cellen decoderen   | E-mails verzenden op basis van lijst   |  Superfilter   |   Speciaal filter(Filter cellen met vetgedrukt lettertype/cursief/doorgestreept...) ...
Top 15 gereedschapssets:12 Teksthulpmiddelen(Tekst toevoegen,Specifieke tekens verwijderen, ...)|   50+Grafiektypen(Gantt-diagram, ...)|   40+ Praktische formules(Leeftijd berekenen op basis van geboortedatum, ...)|   19 Invoeghulpmiddelen(QR-code Invoegen,Afbeelding invoegen vanaf pad, ...)|   12 Conversiehulpmiddelen(Omzetten naar woorden,Wisselkoersconversie, ...)|   7 Samenvoegen en splitsenhulpmiddelen(Geavanceerd samenvoegen van rijen,Cellen splitsen, ...)|... en meer
Gebruik Kutools in uw voorkeurstaal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en 40+ andere talen!

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.

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