Wie entfernt man alphabetische Zeichen aus Zellen in Excel?
Angenommen, Sie möchten alle alphabetischen Zeichen aus einem Zellbereich in Excel entfernen. Ein Beispiel: In einer Zelle steht „lucase 13654698745“, und Sie wollen stattdessen „13654698745“ erhalten. Wie lassen sich alphabetische Zeichen schnell und effizient aus Zellen entfernen? Gibt es dafür bewährte Lösungsansätze?
Entfernen aller alphabetischen Zeichen aus Zellen mithilfe von VBA-Code
So entfernen Sie alle alphabetischen Zeichen mit Kutools für Excel per Klick
![]() | ![]() | ![]() |
Entfernen aller alphabetischen Zeichen aus Zellen mithilfe von VBA-Code
Es ist schwierig, alphabetische Zeichen mithilfe einer Funktion in Excel zu entfernen. Daher können Sie hierfür VBA-Code verwenden. Gehen Sie wie folgt vor, um alle alphabetischen Zeichen mit VBA zu entfernen.
1. Klicken Sie auf Entwickler > Visual Basic oder drücken Sie Alt+F11, um ein neues Microsoft Visual Basic for Applications-Fenster zu öffnen. Klicken Sie anschließend auf Einfügen > Modul, und geben Sie den folgenden Code ein:
VBA: Alphabetische Zeichen entfernen:
Sub RemoveAlphas()
'Updateby20131129
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.]" Then
xStr = ""
Else
xStr = xTemp
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub
3. Klicken Sie dann auf die
-Schaltfläche, um den Code auszuführen. Anschließend erscheint ein Popup-Dialog, in dem Sie einen Bereich zur Verarbeitung auswählen müssen (siehe Screenshot):
.
4. Klicken Sie auf OK, und alle alphabetischen Zeichen werden entfernt.
So entfernen Sie mit einem Klick alle alphabetischen Zeichen mithilfe von Kutools für Excel.
Kutools für Excel: Mit mehr als 300 praktischen Excel-Add-Ins – kostenlos testen, ohne Einschränkungen innerhalb von 30 Tagen.Jetzt herunterladen
Wenden Sie dieses Hilfsprogramm an, indem Sie auf Kutools>Text>Zeichen löschenklicken (siehe Screenshot):
Schritt 1. Wählen Sie den gewünschten Bereich aus.
Schritt 2. Klicken Sie auf Kutools > Texttools in der Gruppe Bearbeiten > Zeichen löschen, und aktivieren Sie im erscheinenden Dialogfeld Zeichen löschen die Option „Alphabetisch“ (siehe Screenshot):

Schritt 3. Klicken Sie auf OK oder Übernehmen, um alle alphabetischen Zeichen im ausgewählten Bereich zu entfernen.
Dieses Hilfsprogramm kann auch numerische Zeichen, nicht-numerische Zeichen, nicht-druckbare Zeichen und vieles mehr entfernen.
Weitere Informationen zur Funktion Zeichen löschen von Kutools für Excel finden Sie unter: Zeichen löschen.
Verwandte Artikel:
Nicht-numerische Zeichen aus Zellen entfernen
Numerische Zeichen aus Zellen entfernen
Nicht-druckbare Zeichen aus Zellen entfernen
Nicht-alphabetische Zeichen aus Zellen entfernen
Nicht-alphanumerische Zeichen entfernen
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


