Wie entfernt man numerische Zeichen aus Zellen in Excel?
Angenommen, Sie haben ein Arbeitsblatt mit vielen Informationen wie "James987den", die sowohl alphabetische als auch numerische Zeichen enthalten, und Sie möchten die alphabetischen Zeichen behalten und alle numerischen Zeichen entfernen. Zum Beispiel möchten Sie "James987den" in "Jamesden" umwandeln. Gibt es schnelle Möglichkeiten, dies zu tun?
Numerische Zeichen mit VBA-Code entfernen
Schnelles Entfernen von numerischen Zeichen mit Kutools für Excel
![]() | ![]() | ![]() |
Numerische Zeichen mit VBA-Code entfernen
Wenn Sie mit VBA-Code vertraut sind, können Sie diese Methode mit den folgenden Schritten verwenden:
1. Klicken Sie auf "Entwickler" > "Visual Basic" oder verwenden Sie die Tastenkombination ("ALT" + "F11") in Excel, um das Fenster Microsoft Visual Basic für Applikationen zu öffnen, und klicken Sie dann auf "Einfügen" > "Modul".
2. Geben Sie den folgenden Code in das Modul ein:
Sub RemoveNum()
'Updateby Extendoffice
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 "[0-9.]" Then
xStr = ""
Else
xStr = xTemp
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub
4. Klicken Sie dann auf die Schaltfläche "Ausführen", um den Code anzuwenden. Ein Dialogfenster erscheint auf dem Bildschirm, in dem Sie einen Bereich auswählen können, um alle numerischen Zeichen zu entfernen. Siehe Screenshot:
5. Klicken Sie auf "OK", um alle numerischen Zeichen zu löschen.
Schnelles Entfernen von numerischen Zeichen mit Kutools für Excel
Das Tool "Zeichen löschen" von "Kutools für Excel" ist ein leistungsstarkes Werkzeug zum Löschen mehrerer Arten von Zeichen.
"Kutools für Excel": Mit über 300 praktischen Excel-Add-ins, kostenlos testbar ohne Einschränkungen für 30 Tage. Jetzt herunterladen
Schritt 1. Wählen Sie den Bereich aus, mit dem Sie arbeiten möchten.
Schritt 2. Klicken Sie auf "Kutools" > "Text" > "Zeichen entfernen". Aktivieren Sie im Dialogfeld die Option "Numerisch", siehe Screenshot:
Schritt 3. Klicken Sie auf "OK" oder "Anwenden", um die numerischen Zeichen in den Bereichen zu löschen.
Die besten Office-Produktivitätstools
Steigern Sie Ihre Excel-Kompetenz mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen, um Ihre Produktivität zu steigern und Zeit zu sparen.Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Reiter-Oberfläche in Office und macht Ihre Arbeit so viel einfacher
- Aktivieren Sie die Bearbeitung und das Lesen in Reitern in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Reitern desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um50 % und reduziert täglich Hunderte von Mausklicks!