Wie entfernt man nur Text aus Zellen, die Zahlen und Text in Excel enthalten?
Wie im folgenden Screenshot gezeigt, wie kann man bei diesen Zellen, die Zahlen und Texte enthalten, alle Texte entfernen und nur die Zahlen in den Zellen behalten? Die Methoden in diesem Artikel können Ihnen helfen.
Entfernen Sie nur Text aus Zellen mit Zahlen und Text mit einer benutzerdefinierten Funktion
Entfernen Sie ganz einfach nur Text aus Zellen mit Zahlen und Text mit Kutools für Excel
Entfernen Sie nur Text aus Zellen mit Zahlen und Text mit einer benutzerdefinierten Funktion
Sie können auch die folgende benutzerdefinierte Funktion verwenden, um Texte aus bestimmten Zellen zu entfernen und nur Zahlen beizubehalten.
1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.
2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das Code-Fenster ein. Siehe Screenshot:
VBA-Code: Entferne nur Text aus Zellen mit Zahlen und Text
Function OnlyNums(strWord As String)
Dim strChar As String
Dim x As Integer
Dim strTemp As String
strTemp = ""
Application.ScreenUpdating = False
For x = 1 To Len(strWord)
strChar = Mid(strWord, x, 1)
If Asc(strChar) >= 48 And _
Asc(strChar) <= 57 Then
strTemp = strTemp & strChar
End If
Next
Application.ScreenUpdating = True
OnlyNums = Val(strTemp)
End Function
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub
3. Drücken Sie die Tasten Alt + Q, um das Fenster Microsoft Visual Basic for Applications zu schließen.
4. Wählen Sie eine leere Zelle aus, geben Sie die Formel =OnlyNums(A2) in die Formelleiste ein und drücken Sie dann die Eingabetaste, um das Ergebnis zu erhalten. Behalten Sie die Ergebniszelle ausgewählt und ziehen Sie ihren Ausfüllkästchen nach unten, um alle Ergebnisse zu erhalten. Siehe Screenshot:
Hinweis: In der Formel ist A2 die Zelle, aus der Sie Texte entfernen und nur Zahlen behalten möchten. Bitte ändern Sie dies nach Bedarf.
Jetzt sehen Sie, dass alle Texte entfernt wurden und nur Zahlen in den angegebenen Zellen verbleiben.
Entfernen Sie ganz einfach nur Text aus Zellen mit Zahlen und Text mit Kutools für Excel
Dieser Abschnitt empfiehlt das Hilfsprogramm „Bestimmte Zeichen löschen“ von Kutools für Excel. Mit diesem Hilfsprogramm können Sie mit wenigen Klicks alle nicht-numerischen Zeichen aus den Zellen entfernen und nur Zahlen in den Zellen behalten. Gehen Sie bitte wie folgt vor.
1. Wählen Sie die Zellen aus, aus denen Sie Texte entfernen und nur Zahlen behalten möchten, und klicken Sie dann auf Kutools > Text > Bestimmte Zeichen löschen.
2. Aktivieren Sie im Dialogfeld „ Bestimmte Zeichen löschen“ nur das Kontrollkästchen Nicht-numerische Zeichen und klicken Sie dann auf die Schaltfläche OK.
Alle nicht-numerischen Zeichen werden sofort aus den ausgewählten Zellen entfernt, wie im folgenden Screenshot dargestellt.
Kutools für Excel - Verleihen Sie Excel mit über 300 essenziellen Tools einen echten Schub. Nutzen Sie dauerhaft kostenlose KI-Funktionen! Holen Sie es sich jetzt
Verwandter Artikel:
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die 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 Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins