Note: The other languages of the website are Google-translated. Back to English

Wie entferne ich nur Text aus Zellen, die Zahlen und Texte in Excel enthalten?

Wie im folgenden Screenshot gezeigt, können Sie für diese mit Zahlen und Texten gemischten Zellen alle Texte entfernen und nur Zahlen in Zellen behalten. Die Methoden in diesem Artikel können Ihnen helfen.

Entfernen Sie nur Text aus Zellen, die Zahlen und Texte mit benutzerdefinierter Funktion enthalten
Entfernen Sie mit Kutools for Excel ganz einfach nur Text aus Zellen, die Zahlen und Texte enthalten


Entfernen Sie nur Text aus Zellen, die Zahlen und Texte mit benutzerdefinierter Funktion enthalten

Sie können auch die folgende benutzerdefinierte Funktion verwenden, um Texte aus bestimmten Zellen zu entfernen und nur Zahlen beizubehalten.

1. Drücken Sie die Taste Andere + F11 Tasten gleichzeitig zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.

2. In dem Microsoft Visual Basic für Applikationen Klicken Sie im Fenster Insert > Modul. Kopieren Sie dann den folgenden VBA-Code und fügen Sie ihn in das ein Kode Fenster. Siehe Screenshot:

VBA-Code: Entfernen Sie nur Text aus Zellen, die Zahlen und Texte enthalten

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 Taste Andere + Q Tasten zum Schließen der Microsoft Visual Basic für Applikationen Fenster.

4. Wählen Sie eine leere Zelle aus und geben Sie die Formel ein = OnlyNums (A2) in die Formelleiste und drücken Sie dann die Weiter Schlüssel, um das Ergebnis zu erhalten. Wählen Sie die Ergebniszelle weiter aus und ziehen Sie den Füllgriff nach unten, um alle Ergebnisse zu erhalten. Siehe Screenshot:

Hinweis: In der Formel. A2 ist die Zelle, in der Sie Texte entfernen und nur Zahlen behalten. Bitte ändern Sie es nach Bedarf.

Jetzt können Sie sehen, dass alle Texte entfernt werden und nur Zahlen in bestimmten Zellen gespeichert werden.


Entfernen Sie mit Kutools for Excel ganz einfach nur Text aus Zellen, die Zahlen und Texte enthalten

In diesem Abschnitt wird das empfohlen Zeichen entfernen Nutzen von Kutools for Excel. Mit diesem Dienstprogramm können Sie alle nicht numerischen Zeichen mit nur wenigen Klicks aus Zellen entfernen und nur Zahlen in Zellen behalten. Bitte gehen Sie wie folgt vor.

Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.

1. Wählen Sie die Zellen aus, die Sie zum Entfernen von Texten benötigen, und behalten Sie nur Zahlen bei. Klicken Sie dann auf Kutoolen > Text > Zeichen entfernen

2. In dem Zeichen entfernen Dialogfeld, überprüfen Sie nur die Nicht numerisch Feld, und klicken Sie dann auf OK .

Anschließend werden alle nicht numerischen Zeichen (Texte) sofort aus den ausgewählten Zellen entfernt (siehe Abbildung unten).

  Wenn Sie eine kostenlose Testversion wünschen (30-Tag) dieses Dienstprogramms, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.


Verwandter Artikel:


Die besten Tools für die Office-Produktivität

Kutools for Excel löst die meisten Ihrer Probleme und erhöht Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einfügen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formelriegel (leicht mehrere Textzeilen und Formeln bearbeiten); Layout lesen (leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt geteilter Zellen; Kombinieren Sie doppelte Zeilen / Spalten... doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie Duplizieren oder Eindeutig Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufällige Auswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen zu mehreren Blättern; Aufzählungszeichen einfügen, Kontrollkästchen und mehr ...
  • Text extrahieren, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen;; Paging-Zwischensummen erstellen und drucken; Inhalt und Kommentare zwischen Zellen konvertieren...
  • Superfilter (Speichern und Anwenden von Filterschemata auf andere Blätter); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Kombinieren Sie Arbeitsmappen und Arbeitsblätter;; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten in mehrere Blätter aufteilen; Batch-Konvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2021 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. 30-tägige kostenlose Testversion mit allen Funktionen. 60 Tage Geld-zurück-Garantie.
kte tab 201905

Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!
officetab unten
Kommentare (5)
Noch keine Bewertungen. Bewerten Sie als Erster!
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Ich habe Excel jahrelang verwendet, aber kein Power-Worker, der Visual Basic noch nie zuvor in einer Tabellenkalkulation verwendet hat. Diese Methode funktionierte absolut zum ersten Mal, indem ich einfach die klaren Anweisungen oben befolgte, und sparte mir Stunden beim Bereinigen eines importierten Blatts. Vielen Dank - sehr geschätzt. Prost
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo zusammen
Ich finde die VBA super und genau das was ich für meinen Job benötige. Allerdings eine Frage an euch Spezialisten, wenn ich führende Nullen habe dann funktioniert sterben VBA bei mir nicht, gibt's da einen Trick damit stirbt auch? Grüße
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Rolands,
Sorry ich verstehe nicht ganz was du meinst. Möchten Sie die führenden Nullen beibehalten, nachdem Sie nur die Texte aus den Zellen entfernt haben?
Oder Sie können hier einen Screenshot Ihrer Daten hochladen, um das Problem genauer zu beschreiben.
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Guten Tag,

Si on veut conserver les virgules avec les chiffres, Kommentar peut-on faire? Merci pour votre réponse
Dieser Kommentar wurde vom Moderator auf der Website minimiert
Hallo Enzo,

Sorry ich verstehe deine Frage nicht ganz. Zur Verdeutlichung fügen Sie bitte eine Beispieldatei oder einen Screenshot mit Ihren Daten und gewünschten Ergebnissen bei.
Es sind noch keine Kommentare vorhanden
Hinterlassen Sie Ihre Kommentare
Als Gast posten
×
Bewerte diese Nachricht:
0   Figuren
Vorgeschlagene Standorte

Folgen Sie uns

Copyright © 2009 - www.extendoffice.com. | Alle Rechte vorbehalten. Unterstützt von ExtendOffice. | Sitemap
Microsoft und das Office-Logo sind Marken oder eingetragene Marken der Microsoft Corporation in den USA und / oder anderen Ländern.
Geschützt durch Sectigo SSL