Hogyan lehet eltávolítani a nem angol karaktereket az Excel oszlopban?
Például a , itt található egy névlista, amely néhány nem angol karaktert tartalmaz. Hogyan lehet gyorsan eltávolítani azokat a cellákat, amelyek nem angol karaktereket tartalmaznak az Excelben?
Távolítsa el a nem angol karaktereket tartalmazó sorokat a VBA segítségével
Távolítsa el a nem angol karaktereket a karakterláncból a Karakterek eltávolítása menüpontban
A VBA nem angol karaktereket tartalmazó sorok eltávolítása
Itt van egy VBA, amely eltávolíthatja azokat a sorokat, amelyek nem angol karaktereket tartalmaznak az Excelben.
1. Aktiválja az eltávolítani kívánt karaktereket tartalmazó munkalapot, majd nyomja meg az gombot Alt + F11 gombok a Microsoft Visual Basic for Applications ablak.
2. kettyenés betétlap > Modulok, és illessze be a kód alatt a Modulok.
VBA: Távolítsa el a nem angol karaktereket
Sub RemoveNonEnglish()
'UpdatebyExtendoffice20171204
Dim xRg As Range
Dim xCell As Range
Dim I As Long
Dim J As Long
Dim xRows As Long
Dim xAsc As Long
On Error Resume Next
Set xRg = Application.InputBox("Select single column:", "KuTools For Excel", Selection.Address, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
xRows = xRg.Rows.Count
Set xRg = xRg(1)
For I = 1 To xRows
Set xCell = xRg.Offset(I - 1)
If xCell.Value <> "" Then
For J = 1 To Len(xCell.Value)
xAsc = Asc(UCase(Mid(xCell.Value, J, 1)))
If xAsc < 65 Or xAsc > 90 Then
xCell.EntireRow.Delete
I = I - 1
Exit For
End If
Next
End If
Next
Application.ScreenUpdating = True
MsgBox "Completed...", vbInformation
End Sub
3. nyomja meg F5 gombot a felbukkanó párbeszédpanelen használni kívánt oszloplista kiválasztásához.
4. kettyenés OK > OK, majd a nem angol karaktereket tartalmazó sorokat eltávolítottuk.
Megjegyzések: ez a VBA csak egy oszlopra használható.
Távolítsa el a nem angol karaktereket a karakterláncból a Karakterek eltávolítása menüpontban
Ha nem angol karaktereket szeretne eltávolítani a karakterláncból, az alábbi képernyőképen látható, akkor jelentkezhet Kutools az Excel számára'S Karakterek eltávolítása funkció gyors befejezéséhez.
Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. |
Telepítése után Kutools for Excel, kérjük, tegye a következőket:(Töltse le ingyen a Kutools for Excel programot most!)
1. Válassza ki a kívánt tartományt, majd kattintson Kutools > szöveg > Karakterek eltávolítása. Lásd a képernyőképet:
2. Jelölje be Nem alfa csak a Karakterek eltávolítása párbeszédpanelen láthatja az eredményt a Preview először.
3. kettyenés Ok, a nem angol karaktereket eltávolítottuk a karakterláncokból.
Demó
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz 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!