how can i check if an value is integer or string?

[h3llz]

how can i check if an value is integer or string?

 

[Stefan Hoffmann]

hi,

how can i check if an value is integer or string?

Public Function IsInteger(AValue As Variant) As Boolean

On Local Error GoTo LocalError

Dim dummy As Integer

Dummy = CInt(AValue)
IsInteger = True

Exit Function

LocalError:
IsInteger = False

End Function




mfG
--> stefan <--