Wie entfernen Sie nicht-englische Zeichen aus einer Excel-Spalte?
Beim Verwalten von Daten in Excel müssen Sie Texte häufig bereinigen – besonders bei Listen, die unerwünschte oder inkonsistente Zeichen enthalten könnten. So kann es beispielsweise vorkommen, dass eine Spalte mit Namen oder Einträgen Zellen umfasst, die nicht-englische Zeichen wie Akzente, Sonderzeichen oder fremdsprachige Schriftzeichen enthalten. Diese gilt es zu entfernen, um die Anforderungen an die Datenkonsistenz zu erfüllen oder eine reibungslose Weiterverarbeitung zu ermöglichen.
Solche Zeichen manuell zu entfernen, kann sehr zeitaufwendig und fehleranfällig sein, besonders bei großen Datensätzen. Um dies effizient zu lösen, bietet Excel mehrere Ansätze: Sie können VBA-Skripte verwenden, um automatisch Zeilen löschen zu löschen, die nicht-englische Zeichen enthalten, oder Sie können die Daten direkt bereinigen, indem Sie nicht-englische Zeichen aus dem Text entfernen, während die Datenstruktur erhalten bleibt. Im Folgenden stellen wir zwei praktische Lösungen vor, um Ihnen bei diesen Szenarien zu helfen.
Zeilen mit nicht-englischen Zeichen mithilfe von VBA entfernen
Nicht-englische Zeichen aus Zeichenfolgen mithilfe von Kutools für Excel entfernen
Nicht-englische Zeichen mithilfe einer Excel-Formel entfernen
Nicht-englische Zeichen aus Zelltext mithilfe von VBA entfernen
Zeilen mit nicht-englischen Zeichen mithilfe von VBA entfernen
Wenn Sie alle Zeilen vollständig löschen möchten, die in einer bestimmten Spalte nicht-englische Zeichen enthalten, kann ein VBA-Skript diesen Prozess automatisieren. Dieser Ansatz eignet sich besonders dann, wenn sichergestellt werden soll, dass nur Zellen mit standardmäßigen englischen Buchstaben verbleiben – jede Zelle mit fremdsprachigen oder Sonderzeichen führt zur Löschung der gesamten Zeile. Diese Methode ist ideal, um saubere Datensätze für den Import in Systeme vorzubereiten, die ausschließlich Standard-Englisch-Zeichen akzeptieren.
Beachten Sie jedoch, dass diese Methode jeweils nur eine Spalte gleichzeitig bearbeiten kann – möchten Sie sie auf weitere Spalten anwenden, müssen Sie das Skript für jede davon separat ausführen. Gelöschte Zeilen lassen sich nach der Ausführung nicht wiederherstellen, es sei denn, Sie haben eine Sicherungskopie erstellt oder können die Rückgängig-Funktion nutzen.
Im Folgenden finden Sie eine Schritt-für-Schritt-Anleitung:
1. Öffnen Sie Ihre Excel-Arbeitsmappe, aktivieren Sie das Arbeitsblatt mit der Spalte, die Sie bearbeiten möchten, und drücken Sie Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen. So erhalten Sie Zugriff auf die in Excel integrierte VBA-Programmierumgebung.
2. Klicken Sie im VBA-Editor auf Einfügen > Modul, um ein neues Modul zu erstellen, und fügen Sie anschließend den folgenden VBA-Code in das erscheinende Codefenster ein:
VBA: Nicht-englische Zeichen entfernen
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. Drücken Sie F5 oder klicken Sie auf die Schaltfläche Ausführen, um den Code auszuführen. Es erscheint ein Dialogfeld mit der Aufforderung „Einzelne Spalte auswählen“. Wählen Sie mit der Maus die Spalte aus, die Sie in Ihrem Arbeitsblatt bearbeiten möchten, und klicken Sie anschließend auf OK.
4. Bestätigen Sie Ihre Auswahl, indem Sie in den folgenden Dialogfeldern auf OK klicken. Das Skript prüft dann jede Zelle in der ausgewählten Spalte. Sobald ein Zeichen erkannt wird, das kein Groß- oder Kleinbuchstabe des englischen Alphabets (A–Z) ist, wird die gesamte Zeile gelöscht, die diese Zelle enthält. Nach Abschluss erhalten Sie eine Meldung, dass der Vorgang abgeschlossen ist.
 |  |  |
Hinweis: Dieses VBA-Skript funktioniert jeweils nur für eine einzelne Spalte. Speichern Sie Ihre Arbeitsmappe unbedingt vor dem Ausführen des Codes, denn gelöschte Zeilen können nach dem Vorgang nicht wiederhergestellt werden. Enthalten Ihre Daten umfangreiche Inhalte oder besondere Formatierungen, erstellen Sie vorab unbedingt eine Sicherungskopie.
Tipps zur Fehlerbehebung: Sollte eine Fehlermeldung erscheinen oder scheinbar nichts passieren, stellen Sie sicher, dass Sie genau eine gültige Spalte – und nicht einen Bereich über mehrere Spalten hinweg – ausgewählt haben. Damit dieses Skript ausgeführt werden kann, muss VBA aktiviert sein. Falls der VBA-Editor in Ihrer Umgebung gesperrt oder eingeschränkt ist, empfiehlt es sich, die entsprechenden Berechtigungen zu aktivieren oder eine alternative Methode zu nutzen.
Anwendbarkeit: Dieser Ansatz eignet sich ideal, wenn sichergestellt werden soll, dass Ihre Daten ausschließlich Einträge mit rein englischen Buchstaben enthalten – und Sie keine Zeilen behalten möchten, die Sonder- oder fremdsprachige Zeichen aufweisen. Falls Ihr Ziel hingegen darin besteht, die Daten zu erhalten und lediglich nicht-englische Zeichen zu entfernen, ohne ganze Zeilen zu löschen, empfehlen wir Ihnen die Kutools-Lösung oder eine der anderen unten beschriebenen Methoden.
Nicht-englische Zeichen aus Zeichenfolgen mithilfe von Kutools für Excel entfernen
Wenn Sie Text innerhalb der Zellen bereinigen möchten, indem Sie nicht-englische Zeichen entfernen – ohne dabei Zeilen zu löschen –, bietet die Bestimmte Zeichen löschen-Funktion in Kutools für Excel eine schnelle und praktische Lösung. Diese eignet sich ideal für Szenarien, in denen Sie die allgemeine Datenstruktur beibehalten, aber Sonder-, Akzent- oder fremdsprachige Zeichen aus Zeichenfolgen entfernen möchten, sodass nur reguläre englische Buchstaben übrig bleiben.
Beispielsweise eignet sich dieser Ansatz ideal zur Standardisierung von Namen, Produktcodes oder alphanumerischen Einträgen, die möglicherweise falsch eingegeben oder aus externen Quellen kopiert wurden und daher Sonderzeichen oder nicht-englische Schriftzeichen enthalten. Im Vergleich zur manuellen Bereinigung minimiert er das Risiko, unerwünschte Zeichen zu übersehen, und beschleunigt den gesamten Prozess deutlich.
 | |  |
1. Wählen Sie den Bereich mit den Textzeichenfolgen aus, die Sie bereinigen möchten. Wechseln Sie dann zur Kutools-Registerkarte im Excel-Menüband, klicken Sie auf Text und wählen Sie Bestimmte Zeichen löschen aus dem Dropdown-Menü. Siehe unten stehenden Screenshot als Referenz:
2. Aktivieren Sie im erscheinenden Bestimmte Zeichen löschen-Dialogfeld die Option Nicht-alphabetisch (diese betrifft nicht-alphabetische Zeichen, einschließlich Ziffern, Satzzeichen sowie Sonder- oder nicht-englischer Symbole). Der Vorschau-Bereich aktualisiert sich automatisch und zeigt an, wie der Text nach dem Entfernen nicht-alphabetischer Zeichen aussehen wird.
3. Sobald Sie bestätigt haben, dass die Vorschau Ihren Erwartungen entspricht, klicken Sie auf OK. Alle nicht-englischen Zeichen (d. h. alles, was kein Standard-Englisch-Buchstabe ist) werden sofort aus dem markierten Bereich entfernt, während der Rest Ihrer Daten unverändert bleibt.
Kutools für Excel– Erweitern Sie Excel mit über 300 unverzichtbaren Tools, um Ihre Arbeit schneller und einfacher zu erledigen, und nutzen Sie KI-Funktionen für intelligentere Datenverarbeitung und höhere Produktivität.Jetzt herunterladen
Wenn Sie häufig Text in Excel bereinigen müssen, bietet der Kutools-Ansatz eine benutzerfreundliche, visuelle Oberfläche und verarbeitet große Bereiche mit nur wenigen Klicks effizient. Zudem unterstützt er die Rückgängig-Funktion, sodass Sie Änderungen schnell rückgängig machen können, falls das Ergebnis nicht Ihren Anforderungen entspricht.
Tipps und Vorsichtsmaßnahmen: Die Option „Nicht-alphabetisch“ entfernt auch alle Zahlen und Sonderzeichen aus dem Text. Wenn Sie Zahlen oder bestimmte Zeichen beibehalten möchten, probieren Sie einfach verschiedene Kontrollkästchen im Dialog aus, bis das gewünschte Ergebnis erscheint. Prüfen Sie stets den Vorschaubereich, um die Wirkung zu bestätigen, bevor Sie auf „OK“ klicken.
Vergleich: Diese Methode ist flexibler als das VBA-basierte Löschen ganzer Zeilen, da sie nur unerwünschte Zeichen entfernt – nicht jedoch die ganze Zeile – und somit weniger destruktiv und sicherer ist, falls das Risiko besteht, wichtige Informationen zu verlieren, die mit jeder Zeile verknüpft sind.
Nicht-englische Zeichen mithilfe einer Excel-Formel entfernen
Wenn Sie keinen Zugriff auf Kutools haben oder auf VBA verzichten möchten, können Sie stattdessen eine Excel-Formel nutzen, um nicht-englische Zeichen – also alles außer den Buchstaben des englischen Alphabets – aus dem Zelltext zu entfernen. Diese Methode eignet sich ideal für alle Fälle, in denen Sie eine nicht-destruktive, formelbasierte Lösung benötigen, die sich mühelos auf jede Zeile anwenden und problemlos auf andere Zellen kopieren lässt.
1. Geben Sie die folgende Matrixformel in die erste Zelle Ihrer Ausgabespalte ein (z. B. B1, wenn sich Ihre Originaldaten in Spalte A befinden):
=TEXTJOIN("",TRUE,IF((CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))>=65)*(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))<=90)+(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))>=97)*(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))<=122),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),""))Diese Formel prüft jedes Zeichen in Zelle A1, behält es nur, wenn es ein Groß- oder Kleinbuchstabe (A–Z bzw. a–z) des englischen Alphabets ist, und fügt das Ergebnis zu einer bereinigten Zeichenfolge zusammen.
2. Drücken Sie nach der Eingabe dieser Formel Strg+Umschalt+Eingabe (für Excel-Versionen vor Office 365; in Office 365 und neuer genügt ein einfacher Druck auf die Eingabetaste). Kopieren Sie die Formel für alle relevanten Zeilen nach unten, indem Sie am Ausfüllkästchen ziehen oder darauf doppelklicken (rechte untere Ecke der Zelle).
Parametererklärung: Diese Formel verwendet die Funktionen MID, CODE (gibt den ASCII-Wert zurück), INDIRECT und ROW, um jedes Zeichen in der Zielzelle zu verarbeiten – es bleiben ausschließlich Buchstaben von a–z bzw. A–Z erhalten.
Vorsichtsmaßnahmen: Dieser Ansatz ändert die Originaldaten nicht; die Ausgaben sind Formelergebnisse in der Zielspalte. Sollten Sie feste, statische Werte benötigen, kopieren Sie die Ergebnisse und verwenden Sie Werte einfügen, um die Formeln zu überschreiben.
Einschränkungen: Die Textlänge beeinträchtigt die Formelleistung. Diese Methode verarbeitet möglicherweise mehrzeichenbasierte Unicode-Grapheme nicht korrekt, sodass einige visuell nicht lateinische Zeichen erhalten bleiben können, wenn sie durch zusammengesetzte Unicode-Sequenzen dargestellt werden.
Nicht-englische Zeichen aus Zelltext mithilfe von VBA entfernen
Wenn Sie nicht-englische Zeichen innerhalb des Zellentexts (ohne ganze Zeilen zu löschen) entfernen möchten, können Sie auch VBA nutzen – für eine noch flexiblere und anpassbare Automatisierung. Das ist ideal für häufige Datenbereinigungsaufgaben, bei denen Add-Ins keine Option sind.
1. Öffnen Sie Excel und drücken Sie anschließend Alt + F11, um den Microsoft Visual Basic for Applications-Editor zu starten. Gehen Sie zu Einfügen > Modul und fügen Sie den folgenden Code in das Modulfenster ein:
Sub RemoveNonEnglishCharactersFromCells()
' Remove non-English characters, keep only a-z, A-Z
Dim rng As Range
Dim cell As Range
Dim i As Long
Dim ch As String
Dim output As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select range to clean (cells will be altered):", xTitleId, rng.Address, Type:=8)
If rng Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each cell In rng
output = ""
For i = 1 To Len(cell.Value)
ch = Mid(cell.Value, i, 1)
If (Asc(ch) >= 65 And Asc(ch) <= 90) Or (Asc(ch) >= 97 And Asc(ch) <= 122) Then
output = output & ch
End If
Next i
cell.Value = output
Next cell
Application.ScreenUpdating = True
MsgBox "Cleanup complete.", vbInformation
End Sub2. Wechseln Sie zurück zu Excel, markieren Sie den Bereich, den Sie bereinigen möchten, kehren Sie zum VBA-Editor zurück und führen Sie den Code aus – entweder durch Drücken von F5 oder durch Klicken auf die Schaltfläche Ausführen. Wählen Sie bei Aufforderung den zu verarbeitenden Bereich aus und bestätigen Sie.
Auswirkungen: Dieser Code verarbeitet jede ausgewählte Zelle, entfernt alle Zeichen, die keine Standardbuchstaben des englischen Alphabets sind, und aktualisiert die Zelle mit dem bereinigten Ergebnis. Die Originaldaten werden überschrieben – sichern Sie daher Ihr Arbeitsblatt oder arbeiten Sie auf einer Kopie.
Kutools für Excel– Erweitern Sie Excel mit über 300 unverzichtbaren Tools, um Ihre Arbeit schneller und einfacher zu erledigen, und nutzen Sie KI-Funktionen für intelligentere Datenverarbeitung und höhere Produktivität.Jetzt herunterladen
Demo: Entfernen nicht-englischer Zeichen aus Zeichenfolgen mithilfe von Kutools für Excel
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor.Kutools für Excel bietet über 300 erweiterte Funktionen zur Steigerung der Produktivität und Zeit sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am dringendsten benötigen...
Office Tab bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher
- Aktivieren Sie tabbasiertes Bearbeiten und Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters – statt jedes in einem separaten Fenster zu öffnen.
- Steigert Ihre Produktivität um 50 % und erspart Ihnen täglich Hunderte von Mausklicks!
Alle Kutools-Add-Ins – ein Installationsprogramm
Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook und PowerPoint sowie Office Tab Pro – ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- Alles-in-einem-Paket— Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro
- Ein Installationsprogramm, eine Lizenz— innerhalb weniger Minuten eingerichtet (MSI-fähig)
- Funktioniert besser zusammen— optimierte Produktivität über alle Office-Anwendungen hinweg
- 30-tägige Vollversion zum Testen— keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis— sparen Sie im Vergleich zum Kauf einzelner Add-Ins