Come rimuovere i caratteri non inglesi in una colonna di Excel?

Ad esempio, ecco un elenco di nomi che includono alcuni caratteri non inglesi. Come puoi rimuovere rapidamente le celle che contengono caratteri non inglesi in Excel?

Rimuovi righe contenenti caratteri non inglesi tramite VBA

Rimuovi caratteri non inglesi dalle stringhe utilizzando Kutools per Excel

Rimuovi righe contenenti caratteri non inglesi tramite VBA

Ecco un codice VBA che può rimuovere le righe contenenti caratteri non inglesi in Excel.

1. Attiva il foglio di lavoro contenente i caratteri che desideri rimuovere e premi i tasti Alt + F11 per abilitare la finestra Microsoft Visual Basic for Applications.

2. Clicca su Inserisci > Modulo e incolla il codice sottostante nel Modulo.

VBA: Rimuovi caratteri non inglesi

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. Premi F5 per selezionare l'elenco delle colonne che vuoi utilizzare nella finestra di dialogo che appare.

4. Clicca OK > OK, e quindi le righe contenenti caratteri non inglesi verranno rimosse.

Nota: questo VBA funziona solo per una colonna.

Rimuovi caratteri non inglesi dalle stringhe utilizzando Kutools per Excel

Se desideri rimuovere i caratteri non inglesi dalle stringhe come mostrato nello screenshot qui sotto, puoi applicare la funzione Rimuovi Caratteri Specifici di Kutools per Excel per completare rapidamente l'operazione.

1. Seleziona l'intervallo di cui hai bisogno e clicca su Kutools > Testo > Rimuovi Caratteri Specifici. Vedi screenshot:

2. Seleziona Caratteri Non Alfabetici solo nella finestra di dialogo Rimuovi Caratteri Specifici puoi vedere il risultato nell' Anteprima inizialmente.

3. Clicca Ok, i caratteri non inglesi sono stati rimossi dalle stringhe.

Demo: Rimuovi caratteri non inglesi dalle stringhe utilizzando Kutools per Excel