Hoe verwijder je niet-alfabetische tekens uit cellen in Excel?
Bijvoorbeeld, je hebt een bereik aan gegevens zoals Jacob "001" @#$%, en je wilt alle niet-alfabetische tekens uit de tekst verwijderen om het te behouden als Jacob. In Excel, hoe kun je snel alle niet-alfabetische tekens uit cellen verwijderen?
Verwijder niet-alfabetische tekens uit cellen met VBA-code
Snel niet-alfabetische tekens uit cellen verwijderen met Kutools voor Excel
Verwijder niet-alfabetische tekens uit cellen met VBA-code
Met VBA-code kun je niet-alfabetische tekens verwijderen en alleen alfabetische tekens (a-z) in de cellen behouden volgens de volgende stappen:
1. Markeer het bereik waaruit je alle niet-alfabetische tekens wilt verwijderen.
2. Klik op Ontwikkelaar > Visual Basic, er verschijnt een nieuw Microsoft Visual Basic for Applications-venster, klik op Invoegen > Module, en voer vervolgens de volgende code in in de Module:
VBA: verwijder alle niet-alfabetische tekens uit cellen
Sub RemoveNotAlphas()
'Updateby2014128
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
xOut = ""
For i = 1 To Len(Rng.Value)
xTemp = Mid(Rng.Value, i, 1)
If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Then
xStr = xTemp
Else
xStr = ""
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub3. En klik dan op
om de code uit te voeren. Er verschijnt een dialoogvenster op het scherm waarin je een bereik kunt selecteren waaruit je alle niet-alfabetische tekens wilt verwijderen. Zie screenshot:
4. Klik vervolgens op OK, alle niet-alfabetische tekens zijn verwijderd. Zie screenshot:
 |  |  |
Snel niet-alfabetische tekens uit cellen verwijderen met Kutools voor Excel
Als je niet alle niet-alfabetische tekens wilt verwijderen met behulp van een VBA-macro, kun je ervoor kiezen om het hulpprogramma Tekens Verwijderen van Kutools voor Excel te gebruiken.
Kutools voor Excel: meer dan 300 handige Excel-add-ins, gratis te proberen zonder beperking gedurende 30 dagen. Haal het nu hier
Nadat je Kutools voor Excel hebt geïnstalleerd, kun je gemakkelijk en comfortabel alle niet-alfabetische tekens uit een bereik aan cellen verwijderen.
1. Selecteer het bereik waaruit je de niet-alfabetische tekens wilt verwijderen.
2. Klik op Kutools > Tekst > Tekens Verwijderen.
3. Er verschijnt een dialoogvenster Tekens Verwijderen. Vink daarna de optie Niet-alfabetische tekens aan in het dialoogvenster Tekens Verwijderen. Tegelijkertijd kun je het resultaat bekijken in het Voorbeeldvenster. Zie screenshot:
4. Klik vervolgens op OK of Toepassen. Alle niet-alfabetische tekens worden verwijderd.
Deze tool kan ook numerieke tekens, niet-numerieke tekens, niet-afdrukbare tekens enzovoort verwijderen. Voor meer gedetailleerde informatie over Tekens Verwijderen, bezoek dan de functiebeschrijving van Tekens Verwijderen.
Gerelateerde artikelen:
- Verwijder alfabetische tekens uit cellen
- Verwijder niet-numerieke tekens uit cellen
- Verwijder numerieke tekens uit cellen
- Verwijder niet-afdrukbare tekens uit cellen
- Snel regeleinden verwijderen
- Verwijder niet-alfanumerieke tekens
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen 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.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen