VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Filtern einer Zahl aus einer Zeichenfolge

Gruppe

UDF

Bereich

Numerisch

Thema

Filtern einer Zahl aus einer Zeichenfolge

Problem

Wie kann ich eine in einer Zeichenfolge enthaltene Zahl herausfiltern?

Lösung

Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.




StandardModule: basMain

Function NumberFilter(strText) As Long
   Dim iCounter As Integer
   Dim sNumber As String
   For iCounter = 1 To Len(strText)
      If IsNumeric(Mid(strText, iCounter, 1)) Then
         sNumber = sNumber & Mid(strText, iCounter, 1)
      End If
   Next iCounter
   NumberFilter = CLng(sNumber)
End Function

    


Beiträge aus dem Excel-Forum zu den Themen UDF und Numerisch