Wie extrahiere ich Zahlen aus gemischten alphanumerischen Textzeichenfolgen in Excel?
Dieses Tutorial bietet drei Methoden zum Extrahieren von Zahlen aus gemischten alphanumerischen Textzeichenfolgen in Excel.
Extrahieren Sie Zahlen aus gemischten alphanumerischen Textzeichenfolgen mit der Formel
Extrahieren Sie Zahlen aus gemischten alphanumerischen Textzeichenfolgen mit VBA-Code
Extrahieren Sie mit einem erstaunlichen Werkzeug ganz einfach Zahlen aus gemischten alphanumerischen Textzeichenfolgen
Extrahieren Sie Zahlen aus gemischten alphanumerischen Textzeichenfolgen mit der Formel
Sie können die folgende Formel anwenden, um Zahlen von einer beliebigen Stelle in einer Textzeichenfolge in Excel zu extrahieren.
1. Wählen Sie eine leere Zelle aus, um die extrahierten Zahlen auszugeben, geben Sie die folgende Formel ein und drücken Sie die Taste Enter Schlüssel. Ziehen Sie dann den AutoFill-Griff nach unten, um die Formel auf andere Zellen anzuwenden.
=IF(SUM(LEN(A2)-LEN(SUBSTITUTE(A2, {"0","1","2","3","4","5","6","7","8","9"}, "")))>0, SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2,ROW(INDIRECT("$1:$"&LEN(A2))),1))* ROW(INDIRECT("$1:$"&LEN(A2))),0), ROW(INDIRECT("$1:$"&LEN(A2))))+1,1) * 10^ROW(INDIRECT("$1:$"&LEN(A2)))/10),"")
Note: In der Formel ist A1 die Zelle, die die Textzeichenfolge enthält, die Sie extrahieren möchten. Bitte ändern Sie es entsprechend Ihren Bedürfnissen.
Dann werden Zahlen von einer beliebigen Stelle in einer Textzeichenfolge in bestimmten Zellen extrahiert, wie im obigen Screenshot gezeigt.
Bewahren Sie Zahlen nur in gemischten alphanumerischen Textzeichenfolgen mit VBA-Code auf
Mit dem folgenden VBA-Code können Sie alle nicht numerischen Zeichen aus dem angegebenen Bereich entfernen und nur Zahlen in Zellen behalten. Bitte gehen Sie wie folgt vor.
Note: Da der Code den ursprünglichen Bereich direkt überschreitet, bewahren Sie bitte eine Kopie des ursprünglichen Bereichs auf, falls Daten verloren gehen.
1. Drücken Sie 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 Modulfenster ein.
VBA-Code: Entfernen Sie alle nicht numerischen Zeichen aus den Zellen
Sub GetNumbers()
'Updated by Extendoffice 20210125
Dim xRegEx As Object
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Pease select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xRegEx = CreateObject("VBScript.RegExp")
With xRegEx
.Pattern = "\D+"
.IgnoreCase = True
.Global = True
End With
xRg.NumberFormat = "@"
For Each xCell In xRg
xCell.Value = xRegEx.Replace(xCell.Value, "")
Next
Set xRegEx = Nothing
End Sub3. Drücken Sie die Taste F5 Schlüssel zum Ausführen des Codes. Dann ein Kutools for Excel Das Dialogfeld wird angezeigt. Wählen Sie den Bereich aus, der die gemischten alphanumerischen Textzeichenfolgen enthält. Sie behalten nur die Zahlen bei, und klicken Sie auf OK .
Jetzt wurden alle nicht numerischen Zeichen im ausgewählten Bereich sofort entfernt und nur die Zahlen beibehalten. Siehe Screenshot:
Extrahieren Sie mit Kutools for Excel ganz einfach Zahlen aus gemischten alphanumerischen Textzeichenfolgen
In diesem Abschnitt wird das Dienstprogramm Text extrahieren von Kutools for Excel empfohlen. Mit diesem Dienstprogramm kann das Extrahieren von Zahlen aus einer Textzeichenfolge einfach sein.
Vor der Bewerbung Kutools for Excel, Bitte Laden Sie es zuerst herunter und installieren Sie es.
1 Klicken Kutoolen > Text > Text extrahieren um die Funktion zu aktivieren.
2. In dem Text extrahieren Dialogfeld, nehmen Sie bitte die folgenden Einstellungen vor.
Schaltfläche, um den Zellenbereich auszuwählen, aus dem Sie Text extrahieren möchten;
Hinweis: Prüfen Sie die Als Formel einfügen Das Feld in der unteren linken Ecke des Dialogfelds fügt das Ergebnis als Formel in die Ergebniszellen ein. Wenn sich der Wert der referenzierten Zelle ändert, wird das Ergebnis automatisch aktualisiert.
3. In dem Text extrahieren Wählen Sie im Dialogfeld eine leere Zelle aus, um den extrahierten Text auszugeben, und klicken Sie dann auf OK.
Dann werden Zahlen von einer beliebigen Position in einer Textzeichenfolge extrahiert. Siehe Screenshot:
Wenn Sie eine kostenlose Testversion (30 Tage) dieses Dienstprogramms wünschen, Bitte klicken Sie, um es herunterzuladenund wenden Sie dann die Operation gemäß den obigen Schritten an.
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 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 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!
