Excel: Specifieke tekens verwijderen, woorden, cijfers uit tekstreeksen verwijderen

Als uw Excel-lijst met tekstreeksen ongewenste tekens, cijfers of symbolen bevat, wilt u die waarschijnlijk verwijderen op basis van hun positie of type. Of u nu tekens aan de linkerkant, rechterkant of in het midden wilt inkorten, of specifieke tekens en cijfers wilt verwijderen – Excel biedt diverse manieren om uw gegevens efficiënt op te schonen. Deze handleiding leidt u stapsgewijs door praktische methoden met formules, User Defined Functions (UDF’s) en ingebouwde functies, zodat u ongewenste tekens, woorden en cijfers moeiteloos uit uw tekstreeksen kunt verwijderen.

Specifieke tekens verwijderen uit de linkerkant, rechterkant of het midden van tekstreeksen verwijderen

Het verwijderen van enkele tekens aan het begin, einde of midden van tekstreeksen in Excel-werkmappen is een veelvoorkomende taak. In deze sectie vindt u handige en eenvoudige trucs om dit snel voor elkaar te krijgen.

1,1 Eerste n tekens uit tekstreeksen verwijderen

Wilt u de eerste n tekens uit een lijst met tekstreeksen verwijderen? De volgende methoden helpen u daarbij.

Met behulp van formules

Normaal gesproken gebruikt u de functie REPLACE of een combinatie van de functies RIGHT en LEN om tekens aan het begin van tekstreeksen te verwijderen.

REPLACE-functie om de eerste N tekens te verwijderen:

• „string": De tekstreeks waaruit u wilt Specifieke tekens verwijderen;
• „num_chars": Het aantal tekens dat u wilt verwijderen.

Gebruik bijvoorbeeld de volgende formule om de eerste twee tekens uit cellen te verwijderen, en sleep vervolgens de vulgreep om de formule naar andere cellen te kopiëren. Zie de schermafbeelding:

=REPLACE(A4, 1, 2, "")

RIGHT- en LEN-functies om de eerste N tekens te verwijderen:

• „string": De tekstreeks waaruit u wilt Specifieke tekens verwijderen;
• „num_chars": Het aantal tekens dat u wilt verwijderen.

Pas de volgende formule toe om de eerste 2 tekens uit cellen te verwijderen:

=RIGHT(A4,LEN(A4)-2)

Met behulp van een door de gebruiker gedefinieerde functie

U kunt ook een User Defined Function maken om de eerste N tekens uit cellen te verwijderen. Volg hiervoor deze eenvoudige stappen:

1. Druk op „Alt + F11” om het venster „Microsoft Visual Basic for Applications” te openen.

2. Klik op 'Insert' > 'Module' en plak de volgende code in het modulevenster.

VBA-code: Eerste n tekens uit tekstreeksen verwijderen

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3. Ga daarna terug naar het werkblad en voer in een lege cel de formule `=removefirstx(A4,2)` in. Sleep vervolgens de vulgreep omlaag om de gewenste resultaten te verkrijgen. Zie schermafbeelding:

Opmerking: In deze formule is „A4” de cel waaruit u specifieke tekens wilt verwijderen; het getal „2” geeft aan hoeveel tekens u aan het begin van de tekstreeks wilt verwijderen.

1,2 Laatste n tekens uit tekstreeksen verwijderen

Om een specifiek aantal tekens aan de rechterkant van tekstreeksen te verwijderen, kunt u ook gebruikmaken van een formule of een door de gebruiker gedefinieerde functie.

Met behulp van een formule

Gebruik een formule met de functies LINKS en LENGTE om de laatste n tekens uit tekstreeksen te verwijderen.

LEFT- en LEN-functies om de laatste N tekens te verwijderen:

• „string": De tekstreeks waaruit u wilt Specifieke tekens verwijderen;
• „num_chars": Het aantal tekens dat u wilt verwijderen.

Gebruik deze formule om de laatste 3 tekens van de tekstreeksen te verwijderen en sleep vervolgens de vulgreep om de formule naar andere cellen te kopiëren. Zie schermafbeelding:

=LEFT(A4, LEN(A4) - 3)

Met behulp van een door de gebruiker gedefinieerde functie

Een User Defined Function helpt u ook om de laatste N tekens uit een lijst met cellen te verwijderen. Volg deze stappen:

1. Druk op Alt + F11 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: Laatste n tekens uit tekstreeksen verwijderen

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. Ga vervolgens terug naar het werkblad en voer in een lege cel de formule `=removelastx(A4,3)` in. Sleep daarna de vulgreep omlaag om de gewenste resultaten te verkrijgen. Zie schermafbeelding:

Opmerking: In deze formule is „A4” de cel waaruit u specifieke tekens wilt verwijderen; het getal „3” geeft aan hoeveel tekens u aan het einde van de tekstreeks wilt verwijderen.

1,3 Eerste, laatste n tekens of tekens op een bepaalde positie verwijderen met een krachtige functie

Het kan lastig zijn om verschillende formules te onthouden. Gelukkig biedt „Kutools voor Excel” een krachtige functie: „Verwijder karakters op een bepaalde positie”. Met deze handige tool verwijdert u in enkele klikken eenvoudig tekens van de linkerkant, rechterkant of een specifieke positie in tekstreeksen — zonder dat u formules hoeft te onthouden.

1. Selecteer de cellen waaruit u specifieke tekens wilt verwijderen en klik op „Kutools” > „Tekst” > „Verwijder karakters op een bepaalde positie”. Zie schermafbeelding:

2. Voer in het dialoogvenster „Verwijder karakters op een bepaalde positie” de volgende stappen uit:

2,1 Eerste n tekens uit cellen verwijderen:

• Typ in het tekstvak 'Aantal' het aantal tekens dat u uit de reeksen wilt verwijderen. In dit voorbeeld verwijder ik de eerste twee tekens.
• Selecteer de optie ‘Van links’ in het gedeelte ‘Positie’.
• Klik daarna op de knop 'OK' of 'Toepassen' om het resultaat te verkrijgen, zoals weergegeven in de schermafbeelding hieronder.

2,2 Laatste n tekens uit cellen verwijderen:

• Typ in het tekstvak 'Aantal' het aantal tekens dat u uit de reeksen wilt verwijderen. In dit voorbeeld verwijder ik de laatste 3 tekens.
• Selecteer de optie ‘Van rechts’ in het gedeelte ‘Positie’.
• Klik daarna op de knop 'OK' of 'Toepassen' om het resultaat te verkrijgen, zoals weergegeven in de schermafbeelding hieronder.

2,3 n tekens verwijderen op een specifieke positie in cellen:

Als u een specifiek aantal tekens wilt verwijderen vanaf een bepaalde positie in de tekstreeksen—bijvoorbeeld 3 tekens vanaf het derde teken—dan kunt u dat eenvoudig doen.

• Typ in het tekstvak 'Aantal' het aantal tekens dat u uit de reeksen wilt verwijderen. In dit voorbeeld verwijder ik 3 tekens vanaf een bepaalde positie.
• Selecteer de optie „Specify” en typ het nummer waarmee u wilt Specifieke tekens verwijderen beginnen in het tekstvak van de sectie „Position”. In dit voorbeeld begin ik Specifieke tekens verwijderen bij het derde teken.
• Klik daarna op de knop „Ok” of „Apply” om het resultaat te verkrijgen, zoals weergegeven in de schermafbeelding hieronder.

1,4 Verwijder zowel de eerste n als de laatste n tekens uit tekstreeksen met een formule

Wanneer u enkele tekens aan beide zijden van tekstreeksen in Excel wilt verwijderen, combineert u de functies MID en LEN om eenvoudig een formule te maken voor deze taak.

• „string”: De tekstreeks waaruit u wilt Specifieke tekens verwijderen;
• „left_chars”: Het aantal tekens dat aan de linkerkant moet worden verwijderd;
• „right_chars”: Het aantal tekens dat aan de rechterkant moet worden verwijderd.

Bijvoorbeeld: u wilt tegelijkertijd de eerste 7 tekens en de laatste 5 tekens uit tekstreeksen verwijderen. Voer dan de volgende formule in een lege cel in:

=MID(A4, 7+1, LEN(A4) - (7+5))

Opmerking: In deze formule is „A4” de cel waaruit u specifieke tekens verwijdert; het getal „7” geeft aan hoeveel tekens u aan de linkerkant wilt verwijderen; het getal „5” geeft aan hoeveel tekens u aan de rechterkant wilt verwijderen.

Sleep daarna de vulgreep omlaag naar de cellen waarop u deze formule wilt toepassen, en u krijgt het resultaat zoals hieronder op de schermafbeelding wordt weergegeven:

Onnodige/speciale tekens uit tekstreeksen verwijderen

Bij het importeren van gegevens vanuit externe bronnen naar Excel kunnen er allerlei speciale of ongewenste tekens in uw werkblad terechtkomen. Om deze ongewenste tekens — zoals #@$%^&, spaties, cijfers, niet-numerieke tekens, regeleinden en dergelijke — snel en eenvoudig te verwijderen, biedt dit gedeelte een aantal handige methoden.

2,1 Enkele speciale tekens uit tekstreeksen verwijderen

Als uw tekstreeksen speciale tekens zoals %^&*() bevatten en u deze wilt verwijderen, kunt u de onderstaande drie trucs toepassen.

Verwijder verschillende speciale tekens uit tekstreeksen met de SUBSTITUTE-functie

Normaal gesproken kunt u in Excel meerdere SUBSTITUTE-functies nesten om elk specifiek teken door niets te vervangen. De algemene syntaxis is:

• „string_cell”: De cel die de tekstreeks bevat waaruit u speciale tekens wilt verwijderen;
• „char1, char2, char3”: de ongewenste tekens die u wilt verwijderen.

Kopieer of voer nu de onderstaande formule in een lege cel in:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2, "#", ""), "&", ""), "*", ""), "%", "")

Sleep daarna de vulgreep omlaag naar de cellen waarop u deze formule wilt toepassen, en alle door u opgegeven ongewenste tekens worden tegelijkertijd verwijderd. Zie de schermafbeelding:

Tip: Als u meer tekens wilt verwijderen, hoeft u alleen maar extra SUBSTITUTE-functies in de formule te nesten.

Verwijder meerdere speciale tekens uit tekstreeksen met een door de gebruiker gedefinieerde functie

De bovenstaande geneste SUBSTITUTE-functies werken goed als er slechts enkele speciale tekens moeten worden verwijderd. Als u echter tientallen tekens moet verwijderen, kan de formule te lang en moeilijk te beheren worden. In dat geval kan de volgende door de gebruiker gedefinieerde functie u snel en eenvoudig helpen bij deze taak.

1. Druk op Alt + F11 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: Meerdere speciale tekens uit tekstreeksen verwijderen

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. Sluit daarna het codevenster en keer terug naar het werkblad. Voer in een lege cel de formule „=RemoveUnwantedChars(A2; $D$2)” in om het resultaat te tonen, en sleep de vulgreep omlaag voor alle gewenste resultaten. Zie de schermafbeelding:

Opmerking: In de bovenstaande formule is „A2” de cel waaruit u specifieke tekens wilt verwijderen; „$D$2” bevat de speciale tekens die u wilt verwijderen (u kunt hier eventueel andere speciale tekens invoeren die u nodig heeft).

Verwijder meerdere speciale tekens uit tekstreeksen met een geweldige functie

Als u Kutools voor Excel heeft geïnstalleerd, kunt u met de functie ‘Specifieke tekens verwijderen’ naar wens allerlei tekens uit een lijst met cellen verwijderen — zoals numerieke tekens, alfanumerieke tekens en niet-afdrukbare tekens.

1. Selecteer het celbereik waaruit u speciale tekens wilt verwijderen en klik op „Kutools” > „Tekst” > „Specifieke tekens verwijderen”. Zie de schermafbeelding:

2. In het dialoogvenster „Specifieke tekens verwijderen”:

• Schakel de optie 'Custom' in onder de sectie 'Specifieke tekens verwijderen'.
• Voer daarna de speciale tekens in het tekstvak in die u wilt verwijderen.
• Klik daarna op de knop „OK” of „Apply” om alle door u opgegeven tekens in één keer te verwijderen. Zie de schermafbeelding:

2,2 Alle cijfers uit tekstreeksen verwijderen

Als u een lijst met tekstreeksen hebt die bestaat uit een combinatie van cijfers, letters en speciale tekens, en u wilt alleen de cijfers verwijderen zonder de overige tekens aan te tasten, dan biedt dit gedeelte een aantal handige methoden.

Verwijder cijfers uit tekstreeksen met de SUBSTITUTE-functie

In Excel helpt de geneste SUBSTITUTE-functie u om alle cijfers te vervangen door niets. Gebruik daarom de onderstaande formule om alle cijfers uit cellen te verwijderen:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,""),0,"")

Sleep vervolgens de vulgreep omlaag naar de cellen waarop u de formule wilt toepassen – alle cijfers worden dan automatisch uit de lijst met tekstreeksen verwijderd. Zie de schermafbeelding:

Verwijder cijfers uit tekstreeksen met de TEXTJOIN-functie

Als u Excel 2019, 2021 of 365 gebruikt, kan de functie TEXTJOIN ook helpen om cijfers uit tekstreeksen te verwijderen.

Kopieer de volgende formule in een lege cel en druk tegelijkertijd op Ctrl + Shift + Enter om het eerste resultaat te verkrijgen:

=TEXTJOIN("", TRUE, IF(ISERR(MID(A2, ROW(INDIRECT( "1:"&LEN(A2) )), 1) *1), MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1), ""))

Kopieer de formule vervolgens naar de onderliggende cellen waarop u deze wilt toepassen. Zie de schermafbeelding:

Opmerking: De TEXTJOIN-functie is uitsluitend beschikbaar in Excel 2019, Excel 2021 en Office 365.

Verwijder cijfers uit tekstreeksen met een door de gebruiker gedefinieerde functie

Naast de bovenstaande twee formules kunt u ook gebruikmaken van een door u gedefinieerde functie. Volg hiervoor de volgende stappen:

1. Druk op „Alt + F11” 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: Cijfers uit tekstreeksen verwijderen

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. Sluit het codevenster en keer terug naar het werkblad. Voer vervolgens de formule =RemoveNumbers(A2) in een lege cel in en sleep de vulgreep omlaag naar de cellen waarop u de formule wilt toepassen. Zie de schermafbeelding:

Verwijder cijfers uit tekstreeksen met een handige optie

Moe van al die ingewikkelde formules? Laat me u dan nu een eenvoudige oplossing tonen: **Kutools voor Excel**, met de handige functie **‘Specifieke tekens verwijderen’**. Met slechts een paar klikken lost u deze taak razendsnel op!

1. Selecteer het celbereik waaruit u cijfers wilt verwijderen en klik op „Kutools” > „Tekst” > „Specifieke tekens verwijderen”.

2. Voer in het dialoogvenster „Specifieke tekens verwijderen” de volgende stappen uit:

• Schakel de optie 'Numeriek' in onder de sectie 'Specifieke tekens verwijderen'.
• Klik daarna op de knop „OK” of „Apply” om de cijfers direct te verwijderen. Zie de schermafbeelding:

2,3 Niet-numerieke tekens uit tekstreeksen verwijderen

Dit gedeelte behandelt enkele methoden om in Excel alle niet-numerieke tekens uit tekstreeksen te verwijderen en alleen de cijfers te behouden.

Verwijder niet-numerieke tekens uit tekstreeksen met een formule in Excel 2016 en eerdere versies

Als u Excel 2016 of een eerdere versie gebruikt, hebt u een complexe formule nodig om deze taak uit te voeren. Kopieer de onderstaande formule of voer deze in een lege cel in:

=SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1)) * ROW(INDIRECT("1:"&LEN(A2))), 0), ROW(INDIRECT("1:"&LEN(A2))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A2)))/10)

Kopieer de formule vervolgens naar de onderliggende cellen waarin u deze wilt toepassen. Zie de schermafbeelding:

Opmerking: Als cijfers in een tekstreeks beginnen met een 0, raakt die voorloopnul verloren.

Niet-numerieke tekens uit tekstreeksen verwijderen met de TEXTJOIN-functie in Excel 2019, 2021, 365

De bovenstaande formule is voor de meeste van ons misschien wat lastig te begrijpen. Maar als u Excel 2019, 2021 of 365 gebruikt, is er een veel overzichtelijkere formule die u kan helpen.

Kopieer of voer de volgende formule in een lege cel in en druk tegelijkertijd op „Ctrl + Shift + Enter” om het eerste juiste resultaat te verkrijgen:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:100")),1)+0,""))

Sleep daarna de vulgreep omlaag naar de cellen waarop u deze formule wilt toepassen, en u krijgt het resultaat zoals hieronder op de schermafbeelding wordt weergegeven:

Opmerking: Deze formule behoudt de voorloopnullen, omdat de cijfers als tekst worden geretourneerd.

Verwijder niet-numerieke tekens uit tekstreeksen met een door de gebruiker gedefinieerde functie

Uiteraard kunt u ook uw eigen, door de gebruiker gedefinieerde functie maken met een eenvoudigere syntaxis. Volg hiervoor deze stappen:

1. Druk tegelijkertijd op Alt + F11 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: Niet-numerieke tekens uit tekstreeksen verwijderen

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. Sluit het codevenster en keer terug naar het werkblad. Voer in een lege cel de formule =Removenonnumeric(A2) in, sleep vervolgens de vulgreep omlaag naar de cellen waarop u de formule wilt toepassen – en zie hoe alleen de cijfers worden geëxtraheerd, zoals op de schermafbeelding hieronder te zien is:

Verwijder niet-numerieke tekens uit tekstreeksen met een eenvoudige functie

Om niet-numerieke tekens direct uit een celbereik te verwijderen, gebruikt u het hulpprogramma „Kutools voor Excel” met de functie „Specifieke tekens verwijderen” – en dat alles met slechts enkele klikken.

1. Selecteer het bereik met cellen waaruit u niet-numerieke tekens wilt verwijderen en klik op „Kutools” > „Tekst” > „Specifieke tekens verwijderen”.

2. Stel in het dialoogvenster „Specifieke tekens verwijderen” de volgende bewerkingen in:

• Schakel de optie „Niet-numeriek” in onder de sectie „Specifieke tekens verwijderen”.
• Klik daarna op de knop „OK” of „Toepassen” om alle niet-numerieke tekens direct te verwijderen. Zie de schermafbeelding:

2,4 Splitsen op tekst en nummer uit één cel opsplitsen in twee kolommen

Soms wilt u tekstreeksen splitsen op basis van tekst en nummers, en deze naar twee afzonderlijke kolommen extraheren. Met de volgende methoden voltooit u deze taak snel en eenvoudig.

Splitsen op tekst en nummer uit één cel opsplitsen in twee kolommen met een door de gebruiker gedefinieerde functie

Met de volgende door de gebruiker gedefinieerde functie kunt u tekst en nummer tegelijkertijd uit een gesplitste waarde extraheren. Volg hiervoor de onderstaande stappen:

1. Druk op Alt + F11 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: Splitsen op tekst en nummer uit tekstreeksen opsplitsen in twee kolommen

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. Sluit en verlaat daarna het codovenster, keer terug naar het werkblad en voer in een lege cel de formule **=SplitText(A2;FALSE)** in. Sleep vervolgens de vulgreep omlaag naar de cellen waarin u deze formule wilt toepassen om alle tekst weer te geven – zie screenshot:

4. Typ vervolgens de formule =SplitText(A2;TRUE) in een andere cel en sleep de vulgreep omlaag naar de cellen waarin u de formule wilt toepassen om de getallen te verkrijgen, zie screenshot:

Splits Splitsen op tekst en nummer uit één cel in twee kolommen met een eenvoudige functie

Als u Kutools voor Excel gebruikt, helpt het hulpprogramma 'Cellen splitsen' u om cellen te splitsen in meerdere kolommen of rijen op basis van willekeurige scheidingstekens, een opgegeven breedte of door tekst en nummer te scheiden.

1. Selecteer het celbereik dat u wilt splitsen en klik op **Kutools** > **Samenvoegen en splitsen** > **Cellen splitsen** (zie screenshot).

2. Selecteer in het dialoogvenster 'Cellen splitsen' de optie 'Splitsen naar kolommen' onder 'Type' en vink daarna 'Splitsen op tekst en nummer' aan bij 'Splitsen op' (zie screenshot).

3. Klik vervolgens op de knop **OK**. Er verschijnt dan het dialoogvenster **Cellen splitsen**. Selecteer een cel om de gesplitste tekst en nummer weer te geven en klik opnieuw op **OK**. Zoals in de onderstaande demo wordt getoond, zie je nu dat tekst en nummer in één keer over twee kolommen zijn gesplitst.

2,5 Verwijder regeleinde-tekens uit tekstreeksen

Een regeleinde maakt het mogelijk om meerdere regels tekst in één cel in Excel te plaatsen. Soms krijgt u regeleinden of carriage returns wanneer u gegevens van een website kopieert of handmatig de inhoud van een cel splitst met de toetsencombinatie **Alt + Enter**. In bepaalde situaties wilt u die regeleinden juist verwijderen, zodat de celinhoud als één enkele regel wordt weergegeven – zoals te zien is in de onderstaande screenshot. Hieronder vindt u enkele eenvoudige methodes om dit in Excel voor elkaar te krijgen.

Verwijder regeleindekarakters uit tekstreeksen met de functie Zoeken en Vervangen

In Excel kunt u de functie „Zoeken en Vervangen" gebruiken om regeleinden te verwijderen, volg hiervoor deze stappen:

1. Selecteer het gegevensbereik waaruit u de regeleinden wilt verwijderen.

2. Klik vervolgens op **Start** > **Zoeken en selecteren** > **Vervangen** (of druk op **Ctrl + H**) om het dialoogvenster **Zoeken en vervangen** te openen – zie screenshot:

3. Voer in het pop-updialoogvenster 'Zoeken en vervangen' de volgende stappen uit:

• Plaats de cursor in het veld „Find what” en druk op Ctrl + J. U ziet mogelijk niets, maar het regeleinde-teken is dan al ingevoegd.
• Laat het veld „Replace With” leeg om alleen de regeleinden te verwijderen, of druk één keer op de spatiebalk om ze te vervangen door spaties.

4. Klik vervolgens op de knop **'Alles vervangen'** om alle regeleinden in de geselecteerde cellen in één keer te verwijderen of te vervangen door spaties. Zie de screenshot:

Verwijder regeleinde-tekens uit tekstreeksen met de SUBSTITUTE-functie

U kunt ook een formule samenstellen met de functies SUBSTITUTE en CHAR om regeleinden uit tekstreeksen te verwijderen.

Pas de onderstaande formule toe om het resultaat te verkrijgen:

=SUBSTITUTE(A2,CHAR(10),"")

Tip: De functie SUBSTITUTE vervangt het teken CHAR(10) — het regeleindekarakter — door niets. Wilt u het resultaat laten scheiden door een komma en een spatie? Gebruik dan de onderstaande formule:

=SUBSTITUTE(A2,CHAR(10),", ")

Verwijder regeleinde-tekens uit tekstreeksen met VBA-code

Als u vertrouwd bent met het gebruik van VBA-code, bieden we u hier ook een handige code aan. Volg hiervoor de volgende stappen:

1. Druk op Alt + F11 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: Regeleinden uit tekstreeksen verwijderen

Sub RemoveCarriage()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3. Druk vervolgens op de toets "F5" om deze code uit te voeren. Er verschijnt dan een invoervenster. Selecteer het bereik waaruit u de regeleinden wilt verwijderen, zoals in onderstaande screenshot wordt getoond:

4. Klik vervolgens op de knop „OK" om alle regeleinden uit het geselecteerde gegevensbereik te verwijderen.

Verwijder regeleinde-tekens uit tekstreeksen met een slimme optie

De functie 'Specifieke tekens verwijderen' van Kutools voor Excel helpt u ook eenvoudig regeleinden te verwijderen.

1. Selecteer het celbereik waaruit u regeleinden wilt verwijderen en klik op **Kutools** > **Tekst** > **Specifieke tekens verwijderen**.

2. Stel in het dialoogvenster 'Specifieke tekens verwijderen' de volgende acties in:

• Schakel de optie „Non-printing” in onder de sectie „Specifieke tekens verwijderen”.
• Klik daarna op de knop „OK” of „Apply” om alle regeleinden uit het geselecteerde gegevensbereik te verwijderen. Zie de schermafbeelding:

2,6 Spaties verwijderen (voorloop-, nabloop-, overtollige of alle spaties) uit tekstreeksen verwijderen

Het kopiëren en plakken van tekst uit een externe bron naar een Excel-werkblad brengt vaak lastige, overbodige spaties met zich mee. Voorloop-, nabloop- of andere overtollige spaties handmatig verwijderen kost veel tijd. Gelukkig biedt Excel eenvoudige trucs om deze klus snel en efficiënt te klaren.

Verwijder extra spaties (voorafgaand, achteraf, overtollig) uit tekstreeksen met de TRIM-functie

In Excel kunt u de handige TRIM-functie gebruiken om voorloop-, nabloop- en overtollige spaties uit tekstreeksen te verwijderen. Deze functie behoudt alleen de enkele spaties tussen woorden.

Voer de onderstaande formule in een lege cel in:

=TRIM(A2)

Sleep vervolgens de vulgreep omlaag om de formule naar andere cellen te kopiëren. Zoals in de screenshot wordt getoond, zijn nu alle voorloop-, volg- en overtollige spaties tussen de woorden in één keer verwijderd:

Verwijder alle spaties uit tekstreeksen

Als u alle witruimtes uit tekstreeksen wilt verwijderen, helpen de functie SUBSTITUTE en de optie Zoeken en vervangen u daarbij.

Met behulp van de functie SUBSTITUTE

Gebruik de functie SUBSTITUTE om alle spaties te verwijderen door ze te vervangen door niets. Pas de onderstaande formule toe in een lege cel:

=SUBSTITUTE(A2," ","") 

Sleep vervolgens de vulgreep omlaag om de formule naar de gewenste cellen te kopiëren — alle spaties worden dan automatisch verwijderd, zoals in de onderstaande screenshot te zien is:

Met behulp van de functie Zoeken en Vervangen

De functie 'Zoeken en vervangen' in Excel helpt u ook om alle spaties uit geselecteerde cellen te verwijderen. Volg hiervoor deze stappen:

1. Selecteer het gegevensbereik waaruit u alle spaties wilt verwijderen.

2. Klik vervolgens op **Start** > **Zoeken en selecteren** > **Vervangen** (of druk op **Ctrl + H**) om het dialoogvenster **Zoeken en Vervangen** te openen. Voer in dit dialoogvenster de volgende stappen uit:

• Druk op de spatiebalk in het veld „Find what”;
• Laat het veld „Replace With” leeg.

3. Klik vervolgens op de knop **'Alles vervangen'** om alle witruimtes in de geselecteerde cellen in één keer te verwijderen. Zie screenshot:

Verwijder alle soorten spaties uit tekstreeksen met een krachtige functie

„Kutools voor Excel" beschikt over een krachtige functie – „Spaties verwijderen". Met dit hulpprogramma kunt u niet alleen Voorafgaande spaties, Volgende spaties en overtollige spaties verwijderen, maar ook alle spaties uit Bereik selecteren in één dialoogvenster, wat uw productiviteit verhoogt.

1. Selecteer het gegevensbereik waaruit u spaties wilt verwijderen en klik vervolgens op **Kutools** > **Tekst** > **Spaties verwijderen**. Zie screenshot:

2. Selecteer in het dialoogvenster 'Spaties verwijderen' bij 'Type ruimte' het type spatie dat u wilt verwijderen:

• Verwijder de Voorafgaande spaties, Selecteer alstublieft de optie „Voorafgaande spaties”;
• Verwijder de Volgende spaties, Selecteer alstublieft de optie „Volgende spaties”;
• Verwijder de Voorafgaande spaties en de Volgende spaties tegelijkertijd, Selecteer alstublieft de optie „Leading & Volgende spaties”;
• Verwijder alle extra spaties, Selecteer alstublieft de optie „Alle overtollige spaties”;
• Verwijder alle spaties; selecteer de optie „All spaces”.

3. Klik daarna op de knop 'OK' of 'Toepassen' om direct het gewenste resultaat te krijgen.

Specifieke tekens verwijderen / tekst voor of na specifiek teken verwijderen

In dit gedeelte introduceer ik enkele bewerkingen om tekst of tekens vóór of ná het eerste, laatste of een specifiek voorkomen van een bepaald teken te verwijderen.

3,1 Tekst vóór of ná het eerste specifieke teken verwijderen

Als u de tekst vóór of ná het eerste specifieke teken (zoals een spatie of komma) uit een lijst met tekstreeksen wilt verwijderen, zoals in onderstaande screenshot wordt getoond, geef ik hier twee methoden:[ [TN_332_END]]

Verwijder tekst vóór het eerste specifieke teken met een formule

Om tekst of tekens vóór het eerste voorkomen van een specifiek teken te verwijderen, kunt u een formule samenstellen met de functies RECHTS, LENGTE en ZOEKEN. De algemene syntaxis is:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken waarmee u tekst wilt verwijderen.

Als u bijvoorbeeld alles vóór de eerste komma uit de lijstreeksen wilt verwijderen, past u de volgende formule toe in een lege cel en sleept u deze omlaag naar de gewenste cellen, zie screenshot:

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

Opmerking: in de bovenstaande formule is "A2" de cel waaruit u tekst wilt verwijderen; "," is het specifieke teken waarop u de tekst wilt splitsen. U kunt dit aanpassen naar elk ander teken dat u nodig hebt.

Verwijder tekst na het eerste specifieke teken met een formule

Om alles na het eerste specifieke teken te verwijderen, combineert u de functies LINKS en ZOEKEN voor het gewenste resultaat. De algemene syntaxis is:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken waarmee u tekst wilt verwijderen.

Voer nu de onderstaande formule in een lege cel in en sleep de vulgreep omlaag naar andere cellen waarin u deze formule wilt toepassen. Alle tekens na de eerste komma worden dan in één keer verwijderd – zie screenshot:

=LEFT(A2,FIND(",",A2)-1)

3,2 Tekst vóór of ná Voorkomen van een teken verwijderen

Soms bevatten de tekstreeksen meerdere exemplaren van een specifiek scheidingsteken. Mogelijk wilt u alle tekens vóór of ná een specifiek exemplaar (zoals het tweede, derde of vierde) verwijderen. Voor dit type verwijdering kunt u de volgende trucs gebruiken:

Tekst vóór Voorkomen van een teken verwijderen met een formule

Om de tekst vóór een specifiek teken te verwijderen, helpt u de volgende formule. De algemene syntaxis is:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken op basis waarvan u tekst wilt verwijderen;
• „N”: De positie van het teken vóór welk de tekst moet worden verwijderd.

Als u bijvoorbeeld alles vóór de tweede komma uit de tekstreeksen wilt verwijderen, past u de onderstaande formule toe:

=RIGHT(A2,LEN(A2)-FIND("#",SUBSTITUTE(A2,",","#",2)))

Opmerking: in de bovenstaande formule is "A2" de cel waaruit u tekst wilt verwijderen; "," is het specifieke teken waarop u de tekst wilt splitsen. U kunt dit aanpassen naar elk ander teken dat u nodig hebt; "2" geeft aan vóór welke n-de komma u de tekst wilt verwijderen.

Sleep daarna de vulgreep om de formule naar andere cellen te kopiëren, zie schermafbeelding:

Tekst verwijderen na Voorkomen van een teken met een formule

Om de tekst na het voorkomen van een specifiek scheidingsteken te verwijderen, helpen de functies LINKS, VERVANGEN en ZOEKEN u daarbij. De algemene syntaxis is:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken op basis waarvan u tekst wilt verwijderen;
• „N”: De positie van het teken waarna de tekst moet worden verwijderd.

Zodra u de basis-syntaxis begrijpt, kopieert of typt u de onderstaande formule in een lege cel:

=LEFT(A2, FIND("#", SUBSTITUTE(A2, ",", "#", 2)) -1)

Opmerking: In de bovenstaande formule is „A2” de cel waaruit u tekst wilt verwijderen; „,” het specifieke teken waarnaar u wilt splitsen – u kunt dit naar elk gewenst teken aanpassen; en „2” geeft aan na welke komma (de tweede) u de tekst wilt verwijderen.

Sleep daarna de vulgreep om de formule naar andere cellen te kopiëren, en alle tekens na de tweede komma worden tegelijkertijd verwijderd, zie schermafbeelding:

Tekst verwijderen vóór of na Voorkomen van een teken met een door de gebruiker gedefinieerde functie

Zoals u ziet, kunt u tekst vóór of na een bepaald teken verwijderen door Excel-functies op verschillende manieren te combineren. Het probleem? U moet al die lastige formules onthouden. Daarom maak ik nu een door de gebruiker gedefinieerde functie die alle scenario’s dekt. Volg deze stappen:

1. Druk op Alt + F11 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: Tekst verwijderen vóór of na Voorkomen van een teken

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. Sluit daarna het codovenster en keer terug naar het werkblad. Gebruik de volgende formules:

Tekst verwijderen vóór de tweede komma:

=RemoveTextOccurrence(A2, ", ", 2, FALSE)

Tekst verwijderen na de tweede komma

=RemoveTextOccurrence(A2, ", ", 2, TRUE)

3,3 Tekst verwijderen vóór of na de laatste instantie van een teken

Als u alle tekst vóór of na het laatste voorkomen van een specifiek teken wilt verwijderen en alleen het deel vóór of na dat teken wilt behouden, biedt deze sectie handige formules om dit probleem eenvoudig op te lossen.

Verwijder tekst vóór de laatste keer dat een teken voorkomt met een formule

Om alle tekens vóór de laatste instantie van een teken te verwijderen, is de algemene syntaxis:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken op basis waarvan u tekst wilt verwijderen;

Als u nu de tekst vóór de laatste komma wilt verwijderen, kopieert of typt u de onderstaande formule in een lege cel:

=RIGHT(A2,LEN(A2)-SEARCH("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",","")))))

Opmerking: In de bovenstaande formule is „A2” de cel waaruit u tekst wilt verwijderen; „,” is het specifieke teken waarop de verwijdering wordt gebaseerd. U kunt dit naar elk ander teken wijzigen, afhankelijk van uw behoeften.

Sleep daarna de vulgreep om de formule naar andere cellen te kopiëren, en alle tekens vóór de laatste komma worden verwijderd zoals op de schermafbeelding wordt getoond:

Verwijder tekst na de laatste keer dat een teken voorkomt met formules

Als de celwaarden gescheiden zijn door een variabel aantal scheidingstekens en u alles na de laatste instantie van dat scheidingsteken wilt verwijderen, is de algemene syntaxis:

• „cell”: De celverwijzing of tekstreeks waaruit u tekst wilt verwijderen;
• „char”: Het specifieke scheidingsteken op basis waarvan u tekst wilt verwijderen;

Kopieer of typ de onderstaande formule in een lege cel en sleep daarna de vulgreep omlaag om de gewenste resultaten te verkrijgen, zie schermafbeelding:

=LEFT(A2,FIND("#",SUBSTITUTE(A2,",>","#",LEN(A2)-LEN(SUBSTITUTE(A2,",",""))))-1)

„Opmerking”: In de bovenstaande formule is „A2” de cel waaruit u tekst wilt verwijderen; „,” is het specifieke teken waarop u de tekst wilt splitsen – u kunt dit naar elk ander teken wijzigen, afhankelijk van uw behoeften.

3,4 Tekst tussen haakjes verwijderen

Als u een lijst met tekstreeksen hebt waarin een deel van de tekens tussen haakjes staat, wilt u die tekens – inclusief de haakjes zelf – mogelijk verwijderen, zoals in de schermafbeelding wordt getoond. Deze sectie behandelt handige trucs om deze taak eenvoudig uit te voeren in Excel.

Tekst tussen haakjes verwijderen met de functie Zoeken en Vervangen

In Excel helpt de ingebouwde functie Zoeken en Vervangen u om alle teksten tussen haakjes te vinden en deze vervolgens te verwijderen. Volg deze stappen:

1. Selecteer de gegevenslijst waaruit u de teksten tussen haakjes wilt verwijderen.

2. Klik vervolgens op **Start** > **Zoeken en selecteren** > **Vervangen** (of druk op **Ctrl + H**) om het dialoogvenster **Zoeken en vervangen** te openen. Voer in dit dialoogvenster de volgende stappen uit:

• Typ „(*)” in het veld „Find what”;
• Laat het veld „Replace With” leeg.

3. Klik daarna op de knop „Alles vervangen”. Alle tekens binnen haakjes – inclusief de haakjes zelf – worden dan in één keer uit de geselecteerde cellen verwijderd. Zie schermafbeelding:

Tip: De functie ‘Zoeken en vervangen’ werkt ook bij twee of meer haakjesparen binnen tekstreeksen.

Verwijder tekst tussen haakjes met een formule

Naast de functie Zoeken en Vervangen kunt u deze taak in Excel ook oplossen met een formule. De algemene syntaxis is:

• De tekstreeks of celverwijzing waaruit u specifieke tekens wilt verwijderen.

Kopieer of typ nu de volgende formule in een lege cel waar u het resultaat wilt verkrijgen:

=SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),"")

Sleep daarna de vulgreep omlaag naar de cellen waarop u deze formule wilt toepassen, en alle teksten binnen haakjes inclusief de haakjes worden tegelijkertijd verwijderd, zie schermafbeelding:

Tip: Als de celwaarde geen haakjes bevat, verschijnt er na toepassing van bovenstaande formule een foutmelding. Gebruik de volgende formule om deze fout te negeren:

=IFERROR(SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),""),A2)

Verwijder tekst tussen haakjes met een door de gebruiker gedefinieerde functie

Bovenstaande formule werkt goed voor het verwijderen van tekst uit één paar haakjes. Als u echter tekst uit meerdere paren haakjes binnen de tekstreeksen wilt verwijderen, werkt de formule niet correct. Daarom maak ik een eenvoudige door de gebruiker gedefinieerde functie om deze taak op te lossen.

1. Druk op Alt + F11 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: Tekst tussen haakjes verwijderen

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. Ga terug naar het werkblad en typ in een lege cel de formule: „=remtxt(A2)”. Sleep vervolgens de vulgreep omlaag om de formule toe te passen. Zoals op de schermafbeelding te zien is, worden alle teksten tussen haakjes – inclusief de haakjes zelf – automatisch verwijderd.

Woorden uit tekstreeksen verwijderen

In bepaalde gevallen wilt u mogelijk enkele woorden uit een lijst cellen verwijderen – bijvoorbeeld het eerste of laatste woord, of dubbele woorden binnen een cel. Deze sectie presenteert hiervoor een aantal effectieve methoden.

4,1 Eerste of laatste woord uit tekstreeks verwijderen

Om het eerste of laatste woord uit een lijst tekstreeksen te verwijderen, helpen de volgende formules u.

Verwijder het eerste woord uit een tekstreeks met een formule

Om de eerste woorden uit een lijst tekstreeksen te verwijderen, maakt u eenvoudigweg een formule met de functies RECHTS, LEN en ZOEKEN. De algemene syntaxis is:

• De tekstreeks of celverwijzing waaruit u het eerste woord wilt verwijderen.

Typ of kopieer nu de volgende formule in een lege cel:

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

Sleep daarna de vulgreep omlaag om de formule op andere cellen toe te passen, zie schermafbeelding:

Tip: Als u de eerste N woorden uit de cellen wilt verwijderen, gebruikt u de volgende formule:

• „text”: De tekstreeks of celverwijzing waaruit u de eerste n woorden wilt verwijderen;
• „N”: Geeft aan hoeveel woorden u aan het begin van de tekstreeks wilt verwijderen.

Als u bijvoorbeeld de eerste twee woorden uit cellen wilt verwijderen, kopieert of typt u de onderstaande formule in een lege cel om het gewenste resultaat te verkrijgen, zie schermafbeelding:

=MID(TRIM(A2),1+FIND("~",SUBSTITUTE(TRIM(A2)," ","~",2)),255)

 Laatste woord uit tekstreeks verwijderen met formule

Om het laatste woord uit tekstreeksen te verwijderen, kunt u ook een formule toepassen. De algemene syntaxis is:

• „text”: De tekstreeks of celverwijzing waaruit u het laatste woord wilt verwijderen;

Gebruik de onderstaande formule in een lege cel en sleep daarna de vulgreep omlaag om de formule op andere cellen toe te passen, zie schermafbeelding:

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

Tip: Om de laatste N woorden uit een lijst cellen te verwijderen, is de algemene syntaxis:

• „text”: De tekstreeks of celverwijzing waaruit u de laatste n woorden wilt verwijderen;
• „N”: Geeft het aantal woorden aan dat u aan het einde van de tekstreeks wilt verwijderen.

Stel dat u de laatste drie woorden uit een lijst met cellen wilt verwijderen. Gebruik dan de onderstaande formule om het gewenste resultaat te verkrijgen – zie de schermafbeelding:

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

4,2 Verwijder dubbele tekens of woorden binnen een cel

Bij het verwijderen van dubbele waarden of rijen biedt Excel diverse opties, maar voor het verwijderen van dubbele tekens of woorden binnen één cel ontbreekt vaak een geschikte ingebouwde functie. In dat geval helpt deze sectie u met het maken van aangepaste, door de gebruiker gedefinieerde functies om dit probleem eenvoudig op te lossen.

Verwijder dubbele tekens binnen een cel met een door de gebruiker gedefinieerde functie

Als u meerdere instanties van hetzelfde teken in een cel hebt en u de Dubbele tekens binnen een cel wilt verwijderen en alleen de eerste instanties wilt behouden zoals op de schermafbeelding wordt getoond, kunt u de volgende door de gebruiker gedefinieerde functie gebruiken.

1. Druk op „Alt + F11" 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: Dubbele tekens binnen een cel verwijderen

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. Sluit vervolgens het codovenster, keer terug naar het werkblad en typ de formule =RemoveDupeschars(A2) in een lege cel naast uw gegevens. Sleep daarna de vulgreep naar alle cellen waarop u de formule wilt toepassen – zie schermafbeelding:

Opmerking: „A2” is de cel met gegevens waaruit u dubbele tekens wilt verwijderen.

Tip: De functie is hoofdlettergevoelig, dus worden hoofdletters en kleine letters als verschillende tekens beschouwd.

Verwijder dubbele woorden binnen een cel met een door de gebruiker gedefinieerde functie

Stel dat u in één cel meerdere keren dezelfde woorden of tekstreeksen hebt en u alle duplicaten uit die cel wilt verwijderen, zoals weergegeven in de schermafbeelding. Gebruik dan de volgende door de gebruiker gedefinieerde functie om deze taak eenvoudig in Excel uit te voeren.

1. Druk op Alt + F11 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: Dubbele woorden binnen een cel verwijderen

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. Sluit vervolgens het codovenster, keer terug naar het werkblad en typ in een lege cel naast uw gegevens de formule =RemoveDupeswords(A2;", "). Sleep daarna de vulgreep naar alle cellen waarop u deze formule wilt toepassen – zie schermafbeelding:

Opmerking: "A2" is de cel waaruit u dubbele woorden wilt verwijderen; de komma en spatie (", ") fungeren als scheidingstekens om de tekstreeksen te splitsen. U kunt deze naar wens vervangen door andere scheidingstekens.

Tip: Deze functie is niet hoofdlettergevoelig – hoofdletters en kleine letters worden als identiek beschouwd.

4,3 Tekstreeks inkorten tot N woorden

Als u een lange tekstreeks in een cel hebt, wilt u die soms inkorten tot een bepaald aantal woorden — oftewel: alleen de eerste *n* woorden behouden en de rest verwijderen. In deze sectie bespreken we handige trucs om dit eenvoudig in Excel te doen.

Beperk een tekstreeks tot N woorden met een formule

Om een tekstreeks in te korten tot N woorden, kunt u een formule samenstellen met behulp van de functies LINKS, ZOEKEN en VERVANGEN. De algemene syntaxis is:

• „text”: De tekstreeks of celverwijzing die u wilt inkorten;
• „N”: Het aantal woorden dat u aan de linkerkant van de opgegeven tekstreeks wilt behouden.

Kopieer of voer de onderstaande formule in een lege cel in om deze taak uit te voeren:

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

Sleep daarna de vulgreep omlaag om deze formule op andere cellen toe te passen; zie schermafbeelding:

Beperk een tekstreeks tot N woorden met een door de gebruiker gedefinieerde functie

Naast de bovenstaande formule kunt u ook een eigen functie maken om deze taak aan te pakken. Volg hiervoor de volgende stappen:

1. Druk op Alt + F11 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: Tekstreeks inkorten tot N woorden

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. Sluit het codevenster en keer terug naar het werkblad. Voer daarna de formule `=GetNWords(A2,B2)` in een lege cel in en sleep de vulgreep omlaag om deze toe te passen op andere cellen. Zo behoudt u precies het opgegeven aantal eerste woorden, zoals in de onderstaande schermafbeelding te zien is:

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

Meer details over Kutools voor Excel...Gratis downloaden...

---

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!

Meer details over Office Tab...Gratis downloaden...

---

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

Meer details over Kutools for Office...Gratis downloaden...