Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe vervang je meerdere spaties met een spatie uit cellen in Excel?

doc vervang meerdere spaties 1

Stel dat ik een lijst met tekstreeksen heb die meerdere spaties bevat, nu moet ik deze spaties vervangen door een spatie tussen de tekstreeksen om de woorden te scheiden zoals in de volgende schermafbeelding. Hoe kan ik de meerdere spaties tegelijk vervangen door één tegelijk zonder ze een voor een te verwijderen?

Vervang meerdere spaties door één spatie door de formule te gebruiken

Vervang meerdere spaties door één spatie door VBA-code te gebruiken

Vervang meerdere spaties door één spatie door Kutools voor Excel te gebruiken


Ruimten tussen letters en woorden verwijderen:

Kutools for Excel's Ruimten verwijderen hulpprogramma kan u helpen verschillende soorten spaties te verwijderen, zoals alle voorloopspaties, volgspaties, alle spaties enzovoort.

doc verwijder spaties

Kutools for Excel: met meer dan 200 handige Excel-add-ins, gratis om zonder beperking in 60-dagen te proberen. Download en gratis proef nu!


Vervang meerdere spaties door één spatie door de formule te gebruiken


In Excel werkt de normale functie Zoeken en Vervangen mogelijk niet goed voor ons om dit probleem op te lossen, zodat we een eenvoudige formule kunnen toepassen om ermee om te gaan. Doe alsjeblieft als volgt:

1. Voer deze formule in: = TRIM (SUBSTITUTE (A2, CHAR (32), "")) in een lege cel naast je celwaarde, zie screenshot:

doc vervang meerdere spaties 2

2. Druk vervolgens op invoeren sleutel om het resultaat te krijgen, en selecteer cel B2, sleep dan de vulgreep naar de bereikcellen die u deze formule wilt toepassen, en alle extra spaties zijn verwijderd uit de tekstreeksen en er wordt slechts één spatie bewaard onder de tekst. Zie screenshot:

doc vervang meerdere spaties 3


Vervang meerdere spaties door één spatie door VBA-code te gebruiken

Als u geïnteresseerd bent in de VBA-code, kan ik een code voor u maken om meerdere spaties door één te vervangen, doe dit als volgt:

1. Houd even ingedrukt ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Dan klikken bijvoegsel > moduleen plak de volgende code in de module Venster.

VBA-code: vervang meerdere spaties met schuine spatie

Sub replace_multiplespaces()
'Updateby20150602
Dim x As Range
Dim Workx As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set Workx = Application.Selection
Set Workx = Application.InputBox("Range", xTitleId, Workx.Address, Type:=8)
    For Each x In Workx
        x = WorksheetFunction.Trim(x)
    Next x
End Sub

3. Druk vervolgens op F5 toets om deze code uit te voeren, en er verschijnt een promptvak om u eraan te herinneren dat u het gegevensbereik selecteert dat u de extra spaties wilt verwijderen, zie screenshot:

doc vervang meerdere spaties 4

4. En klik vervolgens op OK knop, alle overtollige spaties zijn vervangen door een spatie tussen de tekst.


Vervang meerdere spaties door één spatie door Kutools voor Excel te gebruiken

Als u andere soorten spaties wilt verwijderen, zoals het verwijderen van de voorloopspaties, spaties achter elkaar, alle spaties van de tekst, raad ik u aan een krachtig hulpmiddel te gebruiken:Kutools voor Excel, met Ruimten verwijderen utility, kunt u alle spaties verwijderen die u nodig heeft, zoals voorloopruimte, volgspaties, alle spaties ...

Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis om zonder beperking te proberen in 60-dagen.

Na het installeren van Kutools for Excel, alsjeblieft als volgt doen:

1. Selecteer het gegevensbereik waarvan u de extra spaties wilt verwijderen.

2. Klikken Kutools > Tekst > Ruimten verwijderenzie screenshot:

doc vervang meerdere spaties 5 5

3. In de Ruimten verwijderen dialoogvenster, kies Alle overtollige spaties van de Spaces Type sectie en u kunt het resultaat bekijken vanuit de Voorbeschouwing deelvenster, zie screenshot:

doc vervang meerdere spaties 6

4. En klik vervolgens op Ok or Van toepassing zijn knop, alle extra spaties zijn verwijderd uit de cel en laten slechts een spatie tussen de tekst.

Klik om meer te weten over deze functie Spaties verwijderen.

Klik om Kutools voor Excel te downloaden en nu gratis uitproberen!


Demo: vervang meerdere spaties door één spatie door Kutools te gebruiken voor Excel

Kutools for Excel: met meer dan 200 handige Excel-add-ins, gratis om zonder beperking in 60-dagen te proberen. Download en gratis proef nu!


Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Inhoud gesplitste cellen; Combineer dubbele rijen / kolommen... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functionaliteit 60-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen 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.
  • Verhoogt uw productiviteit met 50% en verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Alan Elston · 2 years ago
    Hi
    Thanks for a useful Blog. It helped me get the answer I was looking for.
    _................

    I was just wondering if this is acceptable and correct for removing Replace Multiple Spaces With Single Space From Cells:

    Taking your example,

    Formal to be dragged down:
    =Trim(A2)
    ( I do not understand why you have SUBSTITUTE(A2,CHAR(32)," ") instead of just A2 ??? )
    It appear to give the correct results.

    _.....
    Here is one way I would do it using VBA
    Sub TrimRange()
    Let Range("B2:B9").Value = Evaluate("=If({1},TRIM(" & Range("A2:A9").Address & "))")
    End Sub

    Alan