Any suggestions on how to confirm that the value in a cell is a whole
number?

Bob

Robert Flanagan wrote:
Any suggestions on how to confirm that the value in a cell is a whole
number?

Bob



Def IsWholeNumber as Boolean
IsWholeNumber = MyValue = Abs(Int(MyValue))

I'm pretty sure you don't want the Abs function in there (at least not how
you used it). What is wrong with just this....

IsWholeNumber = MyValue = Int(MyValue)

--
Rick (MVP - Excel)


"smartin" wrote in message
...
Robert Flanagan wrote:
Any suggestions on how to confirm that the value in a cell is a whole
number?

Bob

Def IsWholeNumber as Boolean
IsWholeNumber = MyValue = Abs(Int(MyValue))

Rick Rothstein wrote:
I'm pretty sure you don't want the Abs function in there (at least not
how you used it). What is wrong with just this....

IsWholeNumber = MyValue = Int(MyValue)


My understanding of the definition of "whole numbers" is "the set of
positive integers, including zero". If the OP meant "integer number",
then I agree to remove the Abs wrapper in the test, as you suggest.

Okay, I see what you are doing... you are using the Abs value function to
filter out the negative values (forcing a False for them). Ok, as long as
the OP's understanding of "whole numbers" is the same as yours, your
statement is fine.

--
Rick (MVP - Excel)


"smartin" wrote in message
...
Rick Rothstein wrote:
I'm pretty sure you don't want the Abs function in there (at least not
how you used it). What is wrong with just this....

IsWholeNumber = MyValue = Int(MyValue)


My understanding of the definition of "whole numbers" is "the set of
positive integers, including zero". If the OP meant "integer number", then
I agree to remove the Abs wrapper in the test, as you suggest.

smartin wrote:
My understanding of the definition of "whole numbers" is "the set of
positive integers, including zero". If the OP meant "integer number",
then I agree to remove the Abs wrapper in the test, as you suggest.

The definition is ambiguous:
http://en.wikipedia.org/wiki/Whole_number

Phil Hibbs.

Hello Bob,

Function IsWhole(r As Range) As Boolean
'TRUE if all values in range are whole numbers, FALSE if not.
Dim v, b As Boolean
For Each v In r
If v.Value < CLng(v.Value) Then
IsWhole = False
Exit Function
End If
Next v
IsWhole = True
End Function

Here a whole number is a valid LONG number.
Change Clng to Int if you want to accept numbers 1E15 as well.

Regards,
Bernd

Phil Hibbs wrote:
smartin wrote:
My understanding of the definition of "whole numbers" is "the set of
positive integers, including zero". If the OP meant "integer number",
then I agree to remove the Abs wrapper in the test, as you suggest.

The definition is ambiguous:
http://en.wikipedia.org/wiki/Whole_number

Phil Hibbs.

I find it unintuitive that a negative integer would be considered
"whole", but your point is well taken. I should not assume "whole
number" has a specific meaning in common parlance.

FWIW the definition I used was the one imposed upon me 30-odd years ago.
We were rigorously tested on our ability to place a number in the
correct domain(s) of counting numbers, whole numbers, integers, rational
numbers, irrational numbers and complex numbers. Visions of Venn
diagrams are flooding back to me.