Hallo Bartleby,
vielleicht hilft dir folgende Funktion weiter:
Public Function GetDoubleWE(ByVal sVal As String, ByRef dblVal As Double) As Boolean
On Error GoTo ErrorHandler
dblVal = CDbl(sVal)
GetDoubleWE = True
Exit Function
ErrorHandler:
If Err Then
Err.Clear
End If
End Function
Es ist nicht ganz das was du suchst, für "15.24" oder "15....24" wird 1524 zurückgegeben, wenn du den Punkt im String abfragst sollte das Ergebnis aber stimmen.
HTH
pablo
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP