Hoe vervang ik meerdere spaties in Excel-cellen door één enkele spatie?
Stel dat ik een lijst met tekenreeksen heb die meerdere spaties bevatten. Hoe kan ik al die opeenvolgende spaties in één keer vervangen door één enkele spatie tussen de woorden — zoals op de schermafbeelding — zonder ze handmatig één voor één aan te passen?
Vervang meerdere spaties door één enkele spatie met behulp van een formule
Vervang meerdere spaties door één enkele spatie met behulp van Kutools voor Excel
Vervang meerdere spaties door één enkele spatie met behulp van VBA-code
Vervang meerdere spaties door één enkele spatie met behulp van een formule
In Excel werkt de standaardfunctie Zoeken en Vervangen mogelijk niet optimaal om dit probleem op te lossen. Gelukkig biedt een eenvoudige formule uitkomst. Volg deze stappen:
1. Voer deze formule in een lege cel naast uw celwaarde in:=TRIM(SUBSTITUTE(A2,CHAR(32),„ ")), zie schermafbeelding:
2. Druk vervolgens op Enter om het resultaat te verkrijgen. Selecteer cel B2 en sleep de vulgreep naar het bereik van cellen waarop u deze formule wilt toepassen. Alle overbodige spaties zijn nu uit de tekenreeksen verwijderd, en er blijft slechts één enkele spatie tussen de woorden over. Zie schermafbeelding:
Vervang meerdere spaties door één enkele spatie met behulp van Kutools voor Excel
Als u andere soorten spaties wilt verwijderen, zoals voorloopspaties, volgspaties of alle spaties in de tekst, raad ik u een krachtig hulpmiddel aan: Kutools voor Excel, met de functie Spaties verwijderen. Hiermee verwijdert u eenvoudig alle gewenste spaties, zoals voorloopspaties, volgspaties, alle spaties…
Na installatie van Kutools voor Excel, gaat u als volgt te werk:
1. Selecteer het gegevensbereik waaruit u de overbodige spaties wilt verwijderen.
2. Klik op Kutools > Tekst > Spaties verwijderen, zie schermafbeelding:
3. In het dialoogvenster Spaties verwijderen kiest u Alle overtollige spaties in het gedeelte Type ruimte. U kunt het resultaat direct bekijken in het voorbeeldvenster Voorbeeld, zie schermafbeelding:
4. Klik daarna op de knop Ok of Toepassen. Alle overbodige spaties zijn nu uit de cel verwijderd, en er blijft slechts één enkele spatie tussen de woorden over.
Klik hier om Kutools voor Excel te downloaden en het nu gratis uit te proberen!
Vervang meerdere spaties door één enkele spatie met behulp van VBA-code
Bent u geïnteresseerd in de VBA-code? Dan maak ik graag een script voor u waarmee u meerdere spaties automatisch vervangt door één enkele spatie. Volg deze stappen:
1. Houd de toetsen ALT + F11 ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Klik vervolgens op Invoegen > Module en plak de volgende code in het Module-venster.
VBA-code: Vervang meerdere spaties door één enkele spatie
Sub replace_multiplespaces()
'Updateby Extendoffice
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 daarna op de toets F5 om deze code uit te voeren. Er verschijnt een dialoogvenster waarin u wordt gevraagd het gegevensbereik te selecteren waaruit u de overbodige spaties wilt verwijderen, zie schermafbeelding:
4. Klik daarna op de knop OK. Alle overtollige spaties zijn nu vervangen door één enkele spatie tussen de woorden.
Beste Office-productiviteitshulpmiddelen
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.
- 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