Function IsInteger(value As Variant) As Boolean
    If IsNumeric(value) Then
        IsInteger = (Int(value) = value)
        IsInteger = False
    End If
End Function
使用这个函数，可以将需要判断的值传递给 value 参数，然后得到一个布尔值，表示该值是否为整数。如果返回值为 True，则说明该值为整数；如果返回值为 False，则说明该值不为整数。
希望这个回答能够帮到您。