Zum Hauptinhalt springen

Wie entfernt man nur Text aus Zellen, die Zahlen und Text in Excel enthalten?

Author: Siluvia Last Modified: 2025-05-28

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.

A screenshot showing Excel cells with numbers and text mixed, and result with text removed

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

A screenshot showing VBA code entry in Excel for removing text

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:

A screenshot showing results after applying VBA code to remove text in Excel

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.

Kutools für Excel bietet über 300 erweiterte Funktionen, um komplexe Aufgaben zu vereinfachen und Kreativität sowie Effizienz zu steigern. Durch die Integration mit KI-Funktionen automatisiert Kutools Aufgaben präzise und macht das Datenmanagement mühelos. Detaillierte Informationen zu Kutools für Excel... Kostenlose Testversion...

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.

A screenshot of Kutools Remove Characters feature in Excel

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.

A screenshot of Kutools Remove Characters dialog

Alle nicht-numerischen Zeichen werden sofort aus den ausgewählten Zellen entfernt, wie im folgenden Screenshot dargestellt.

A screenshot showing results in Excel after removing non-numeric characters with Kutools

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:

Beste Büroproduktivitätswerkzeuge

🤖 Kutools AI-Assistent: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung   |  Code generieren  |  Benutzerdefinierte Formeln erstellen  |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Finden, Hervorheben oder Doppelte markieren   |  Leere Zeilen löschen   |  Spalten oder Zellen kombinieren ohne Datenverlust   |   Runden ...
Erweiterte SVERWEIS: Mehrfachkriterien SVERWEIS    Mehrfachwert SVERWEIS  |   Mehrblatt-SVERWEIS   |   Fuzzy Match ....
Erweiterte Dropdown-Liste: Schnell Dropdown-Liste erstellen   |  Abhängige Dropdown-Liste   |  Mehrfachauswahl Dropdown-Liste ....
Spaltenmanager: Eine bestimmte Anzahl von Spalten hinzufügen  |  Spalten verschieben  |  Sichtbarkeitsstatus ausgeblendeter Spalten umschalten  |  Bereiche & Spalten vergleichen ...
Hervorgehobene Funktionen: Gitterfokus   |  Entwurfsansicht   |   Erweiterte Formelleiste    Arbeitsmappe & Arbeitsblatt-Manager   |  AutoText-Bibliothek (Auto Text)   |  Datumsauswahl   |  Daten zusammenführen   |  Zellen verschlüsseln/entschlüsseln    E-Mail senden nach Liste   |  Spezialfilter   |   Spezialfilter (Filtern fett/kursiv/durchgestrichen...) ...
Top15 Werkzeugsets12 Textwerkzeuge (Text hinzufügen, Bestimmte Zeichen löschen, ...)   |   50+ Diagramm typen (Gantt-Diagramm, ...)   |   40+ Praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...)   |   19 Einfügewerkzeuge (QR-Code einfügen, Bild aus Pfad einfügen, ...)   |   12 Konvertierungswerkzeuge (In Wörter umwandeln, Währungsumrechnung, ...)   |   7 Konsolidieren & Aufteilen Werkzeuge (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...)   |   ... und mehr

Verbessern Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über300 erweiterte Funktionen zur Steigerung der Produktivität und Zeitersparnis.  Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...


Office Tab bringt eine Registerkartenoberfläche zu Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die Bearbeitung und das Lesen mit Registerkarten in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters, anstatt in neuen Fenstern.
  • Steigert Ihre Produktivität um50 % und reduziert täglich hunderte von Mausklicks für Sie!