ich habe folgendes Problem:
in einer Zelle steht: 10 ST
die Zelle ist als "Standard" formatiert.
nun möchte ich aus der Zelle nur die Zahl (also 10) auslesen (oder dass, das ST gelöscht wird).
wie ist das möglich?
Function BuchstRaus(rng As Range) '=BuchstRaus(A1)
Dim intz As Integer
For intz = 1 To Len(rng)
Select Case Asc(Mid(rng, intz, 1))
Case 48 To 57
BuchstRaus = Val(BuchstRaus & Mid(rng, intz, 1))
End Select
Next intz
End Function