if you want all the numerals then this will do it for you,to use it
B2 Formula = "=getnumerals (A2)" then fill down 

Function getnumerals(tt As Variant)

ott = ""
For i = 1 To Len(tt)
ntt = Mid(tt, i, 1)


If IsNumeric(ntt) Then
 ott = ott & ntt
End If
Next i
getnumerals = ott
End Function