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.
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!
