Zum Hauptinhalt springen

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

Author: Siluvia Last Modified: 2025-08-06

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:

Die besten Office-Produktivitätstools

🤖 Kutools AI Aide: Revolutionieren Sie die Datenanalyse basierend auf: Intelligente Ausführung |  Code generieren  |  Benutzerdefinierte Formeln erstellen |  Daten analysieren und Diagramme generieren  |  Erweiterte Funktionen aufrufen
Beliebte Funktionen: Doppelte suchen, hervorheben oder markieren | Leere Zeilen löschen | Spalten oder Zellen ohne Datenverlust zusammenführen | Runden
Erweiterte SVERWEIS: SVERWEIS mit mehreren Kriterien | SVERWEIS für mehrere Werte | Mehrblatt-SVERWEIS | Fuzzy Match
Erweiterte Dropdown-Liste: Dropdown-Liste schnell erstellen | Abhängige Dropdown-Liste | Mehrfachauswahl-Dropdown-Liste
Spalten-Manager: Eine bestimmte Anzahl an Spalten hinzufügen | Spalten verschieben | Sichtbarkeit von ausgeblendeten Spalten umschalten | Bereiche & Spalten vergleichen
Hervorgehobene Funktionen: Gitterfokus | Entwurfsansicht | Erweiterte Formelleiste | Arbeitsmappen- & Blattmanager | AutoText-Bibliothek | Datumsauswahl | Daten zusammenführen | Zellen verschlüsseln/entschlüsseln | E-Mail senden nach Liste | Super Filter | Spezialfilter (Filtern nach Fett/Kursiv/Durchgestrichen...)…
Top15 Toolsets:12 Text-Tools (Text hinzufügen, Bestimmte Zeichen löschen, ...) | 50+ Diagramm typen (Gantt-Diagramm, ...) | 40+ praktische Formeln (Alter basierend auf dem Geburtsdatum berechnen, ...) | 19 Einfüge-Tools (QR-Code einfügen, Bild aus Pfad einfügen, ...) | 12 Konvertierungs-Tools (In Wörter umwandeln, Währungsumrechnung, ...) | 7 Konsolidieren & Aufteilen-Tools (Erweiterte Zeilen zusammenführen, Zellen aufteilen, ...) | ... und mehr
Nutzen Sie Kutools in Ihrer bevorzugten Sprache – unterstützt Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere Sprachen!

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!