Gruppe
UDF
Problem
Wie kann ich über eine benutzerdefinierte Funktion prüfen, ob es sich beim Eingabewert um einen Integer-Wert handelt?
StandardModule: basMain
Function IntegerTest(dValue As Double) As Boolean
If dValue > -32769 And dValue < 32768 And _
dValue - Fix(dValue) = 0 Then
IntegerTest = True
Else
IntegerTest = False
End If
End Function