Hi Mulvaney,
I ran into the same problem and solved it making a simple VBA Function.
----------------------------------------------------------------------
Public Function NumPart(c) As String
Dim i As Integer
Dim Tekst As String
'Templatebuilder
'Returning numeric value from string'
Tekst = ""
For i = 1 To Len(c)
If InStr(1, "0123456789", Mid(c, i, 1), vbTextCompare) 0 Then
Tekst = Tekst + Mid(c, i, 1)
Next i
NumPart = Tekst
End Function
-------------------------------------------------
Now you can use the function in your worksheet. (example =numpart(A1))
Probably there will be other (maybe better) solutions. But this one is
working for me.
gr. TemplateBuilder
|