Difference between revisions of "IsNumber"

From scripting
Jump to: navigation, search
(Created page with " Function IsNumber(ValueObj As String) As Boolean On Error GoTo Blast Dim HHH As Double HHH = CDbl(ValueObj) IsNumber = True Exit Function Blast: IsNumber = False End...")
 
(No difference)

Latest revision as of 07:01, 22 April 2017

Function IsNumber(ValueObj As String) As Boolean
On Error GoTo Blast
Dim HHH As Double
HHH = CDbl(ValueObj)
IsNumber = True
Exit Function
Blast:
IsNumber = False
End Function