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.

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.

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