Note: The other languages of the website are Google-translated. Back to English
Belépek  \/ 
x
or
x
Regisztráció  \/ 
x

or

Hogyan lehet eltávolítani a nem alfanumerikus karaktereket az Excel programban?

Feltételezve, hogy számos adat létezik, mint pl JAMES0898 # 4% ^ {}, amely nem alfanumerikus karaktereket tartalmaz egy munkalapon, és most csak a nem alfanumerikus karaktereket akarja eltávolítani, és megtartani az alfanumerikus karaktereket. Például, JAMES0898 # 4% ^ {} > JAMES0898. Hogyan lehet gyorsan törölni ezeket a nem alfanumerikus karaktereket az Excelben?


Távolítsa el a nem alfanumerikus karaktereket VBA kóddal

Az alábbi rövid VBA kóddal eltávolíthatja a nem alfanumerikus karaktereket is. Megteheti így:

1. nyomja meg más + F11 gombok együtt megnyitni a Microsoft Visual Basic alkalmazásokhoz ablak.

2. kettyenés betétlap > Modulok, majd illessze be a VBA kód alá a modulba:

VBA: Távolítsa el az összes nem alfanumerikus karaktert

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. nyomja meg F5 vagy kattintson a gombra futás gombot a kód végrehajtásához.

4. Ezután válassza ki az előugró párbeszédpanelen azt a tartományt, amelyet el akar távolítani az összes nem alfanumerikus karakterből, majd kattintson a gombra OK gombot.

Most az összes nem alfanumerikus karakter törölve lett a kiválasztott tartományból. Lásd a képernyőképet:

2 kattintás az összes nem alfanumerikus karakter eltávolításához egy csodálatos eszközzel

A kurzort általában egy cellába tesszük, majd manuálisan egyenként eltávolítjuk a nem alfanumerikus karaktereket. Ha ismeri a VBA-t vagy a felhasználó által definiált funkciókat, kódolhatja, és tömegesen eltávolíthatja az összes nem alfanumerikus karaktert. De itt egy csodálatos eszközt fogok ajánlani, a Karakterek eltávolítása funkciót a Kutools for Excel alkalmazáshoz, amely mindenféle karaktert csak 2 kattintással távolíthat el! 30 napos teljes funkciós ingyenes próba!

Távolítsa el a nem alfanumerikus karaktereket a Felhasználó által definiált funkcióval

Megadhat egy egyéni függvényt is, amely eltávolítja az összes nem alfanumerikus karaktert az Excel celláiból.

1. nyomja meg más + F11 gombok együtt megnyitni a Microsoft Visual Basic alkalmazásokhoz ablak.

2. Kattints betétlap > Modulok, majd illessze be az alábbi kódot a modulba:

Felhasználó által definiált funkció: Távolítsa el az összes nem alfanumerikus karaktert

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. Most térjen vissza a munkalapra, válasszon egy üres cellát, és írja be a képletet = DeleteNonAlphaNumeric (B3), majd húzza az AutoFill fogantyú letöltését a képlet más cellákra való alkalmazásához.


Távolítsa el a nem alfanumerikus karaktereket a Kutools for Excel alkalmazással

Két fenti módszerrel ismernie kell a kódokat, de mint Excel kezdők, a legtöbben nem használhatjuk a kódot, ezért itt egy egyszerű módszert adok meg.

Kutools az Excel számára- Több mint 300 praktikus eszközt tartalmaz az Excel számára. Teljes funkciós ingyenes 30 napos próbaidőszak, nincs szükség hitelkártyára! Szerezd meg most

Ha telepítette a Kutools for Excel alkalmazást, kérjük, tegye a következőket:

1. Válassza ki azt a tartományt, amelyből el kell távolítania a nem alfanumerikus karaktereket, majd kattintson a gombra Kutools > szöveg > Karakterek eltávolítása.

2. Aztán a Karakterek törlése párbeszédpanel jelenik meg, csak jelölje be Nem alfanumerikus opciót, és kattintson a Ok gombot.

Most az összes nem alfanumerikus karaktert törölte a szöveges karakterláncokból.


Kapcsolódó cikkek:


A legjobb irodai termelékenységi eszközök

A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet

  • újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
  • Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
  • Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
  • Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
  • Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
  • Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
  • Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
  • Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
  • Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2019 és 365. Támogatja az összes nyelvet. Könnyen telepíthető a vállalkozásba vagy szervezetbe. 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.
kte lap 201905

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
officetab alja
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