UDF zu Extrahieren nur Nummer
UDF, um nur Zahlen aus einer Zelle mit VBA in Microsoft Excel zu extrahieren
In diesem Artikel erfahren Sie, wie Sie mit VBA-Code nur Zahlen aus einer Zelle mit der benutzerdefinierten Funktion extrahieren.
Frage): Ich benötige ein Makro, um die Nummer nur aus einer Zelle abzurufen, die alphanumerische Daten enthält.
Es folgt die Momentaufnahme der Daten, in denen Spalte A alphanumerische Daten enthält und die erwarteten Zahlen in Spalte B
Um nur die Zahlen aus Spalte A zu erhalten; Führen Sie die folgenden Schritte aus, um den VB-Editor zu starten. Klicken Sie auf die Registerkarte Entwickler. Wählen Sie in der Gruppe Code die Option Visual Basic
aus Kopieren Sie den folgenden Code in das Standardmodul
Funktion NumericOnly (mystr As Variant)
Dim myOutput As String, i As Integer
Für i = 1 An Len (mystr)
If IsNumeric (Mid (mystr, i, 1)) Dann _
myOutput = myOutput & Mid (mystr, i, 1)
Weiter
NumericOnly = myOutput * 1
End Function
===
-
Um die Ausgabe in Zelle B2 zu erhalten, lautet die Formel
* = NumericOnly (A2)
===
===
Auf diese Weise können wir mit VBA-Code nur Zahlen aus einer Zelle abrufen, die Text und Zahlen enthält.
