Note: The other languages of the website are Google-translated. Back to English
Inloggen  \/ 
x
or
x
Registreer  \/ 
x

or

Hoe niet-alfanumerieke tekens in Excel te verwijderen?

Stel dat er een reeks gegevens is, zoals JAMES0898 # 4% ^ {}, dat niet-alfanumerieke tekens in een werkblad bevat, en nu wilt u alleen de niet-alfanumerieke tekens verwijderen en de alfanumerieke tekens behouden. Bijvoorbeeld, JAMES0898 # 4% ^ {} > JAMES0898. Hoe verwijder je snel die niet-alfanumerieke tekens in Excel?


Verwijder niet-alfanumerieke tekens met VBA-code

Met de volgende korte VBA-code kunt u ook de niet-alfanumerieke tekens verwijderen. Je kunt het als volgt doen:

1. druk op anders + F11 sleutels samen om de te openen Microsoft Visual Basic voor applicaties venster.

2. klikken Invoegen > moduleen plak vervolgens onder VBA-code in de module:

VBA: verwijder alle niet-alfanumerieke tekens

Sub RemoveNotAlphasNotNum()
'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.]" Or xTemp Like "[0-9.]" Then
            xStr = xTemp
        Else
            xStr = ""
        End If
        xOut = xOut & xStr
    Next i
    Rng.Value = xOut
Next
End Sub

3. pers F5 toets of klik op de lopen knop om de code uit te voeren.

4. Selecteer vervolgens een bereik waarvan u alle niet-alfanumerieke tekens wilt verwijderen in het pop-upvenster en klik op het OK knop.

Nu zijn alle niet-alfanumerieke tekens verwijderd uit het geselecteerde bereik. Zie screenshot:

2 klikken om alle niet-alfanumerieke tekens te verwijderen door een geweldige tool

We plaatsen de cursor meestal in een cel en verwijderen niet-alfanumerieke tekens een voor een handmatig. Als u bekend bent met VBA of door de gebruiker gedefinieerde functies, kunt u deze coderen en alle niet-alfanumerieke tekens bulksgewijs verwijderen. Maar hier zal ik een geweldige tool aanbevelen, de functie Karakters verwijderen van Kutools voor Excel, die allerlei soorten tekens met slechts 2 klikken kan verwijderen! Gratis proefversie met volledige functionaliteit 30 dagen!

Verwijder niet-alfanumerieke tekens met door de gebruiker gedefinieerde functie

U kunt ook een aangepaste functie definiëren om alle niet-alfanumerieke tekens uit cellen in Excel te verwijderen.

1. pers anders + F11 sleutels samen om de te openen Microsoft Visual Basic voor applicaties venster.

2. Klikken Invoegen > module, en plak vervolgens onderstaande code in de module:

Door gebruiker gedefinieerde functie: verwijder alle niet-alfanumerieke tekens

Function DeleteNonAlphaNumeric(xStr As String) As String
Dim xStrR As String
Dim xCh As String

Dim xStrMode As String
Dim xInt As Integer
    xStrMode = "[A-Z.a-z 0-9]"
    xStrR = ""
    For xInt = 1 To Len(xStr)
        xCh = Mid(xStr, xInt, 1)
        If xCh Like xStrMode Then
            xStrR = xStrR & xCh
        End If
    Next
    DeleteNonAlphaNumeric = xStrR
End Function
    

3. Ga nu terug naar het werkblad, selecteer een lege cel en voer de formule in = DeleteNonAlphaNumeric (B3)en sleep vervolgens de downloadgreep voor automatisch aanvullen om deze formule op andere cellen toe te passen.


Verwijder niet-alfanumerieke tekens met Kutools voor Excel

Met bovenstaande twee methoden moet u de codes kennen, maar als Excel-beginners kunnen de meesten van ons de code niet gebruiken, dus hier zal ik u een eenvoudige manier geven om het te doen.

Kutools for Excel- Bevat meer dan 300 handige tools voor Excel. Gratis proefperiode van 30 dagen met volledige functionaliteit, geen creditcard vereist! Snap het nu

Als je Kutools voor Excel hebt geïnstalleerd, doe dit dan als volgt:

1. Selecteer het bereik waaruit u niet-alfanumerieke tekens wilt verwijderen en klik op Kutools > Tekst > Tekens verwijderen.

2. Dan een Verwijder tekens dialoogvenster verschijnt, controleer alleen Niet alfanumeriek optie en klik op de Ok knop.

Nu zijn alle niet-alfanumerieke tekens verwijderd uit de tekstreeksen.


Gerelateerde artikelen:


De beste tools voor kantoorproductiviteit

Kutools voor Excel lost de meeste van uw problemen op en verhoogt uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen zonder gegevens te verliezen; Gespleten cellen inhoud; Combineer dubbele rijen / kolommen... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren 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. Gratis proefperiode van 30 dagen met volledige functies. 60 dagen geld-terug-garantie.
kte tabblad 201905

Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, 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 vermindert elke dag honderden muisklikken!
officetab onderkant
Say something here...
symbols left.
You are guest
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.
    Dee · 4 years ago
    How do you remove the characters while keeping the space separator?
  • To post as a guest, your comment is unpublished.
    Mike Litoris · 7 years ago
    VBA method worked, but only works on the selected range. You cannot specify the output into a different range of cells than the input. So you must copy the source data into the target range, select the data, run the script and allow it to output to the default range. Also, the period (.) is not considered a special character, so if you want to remove those too, you'll need to search and replace.
  • To post as a guest, your comment is unpublished.
    Bryan Steven · 7 years ago
    Thanks for sharing, but still don't like the input-box method... :D