even numbers
Thanks for your mail Dana!
This is what I did, and now it works:
I checked Tools/Add-Ins/Analysis Toolpak - VBA in Excel.
Then I checked Tools/References/atpvbaen.xls in Visual Basic Editor.
(for you with similar problem: if you don't see atpvbaen.xls in Visual Basis
Editor Tools/References,
click Browse and find file atpvbaen.xla - probably in \Microsoft Office\
Office10\Library, or something like that)
Regards,
Tommi
"Dana DeLouis" wrote in message
...
I'm not sure. If I don't have the reference set, then I get a
"Compile error: Sub or Function not defined"
I'm just guessing. Unselect this in the vba library. Go to the
worksheet,
and select <Tools <Add-Ins and make sure the Analysis ToolPak is
selected.
Then, try the library reference again.
--
Dana DeLouis
Using Windows XP & Office XP
= = = = = = = = = = = = = = = = =
"Tommi" wrote in message
...
I tried this. I set the Tools/Referencese to atpvbaen.xls and then used
IsEven. but I get this "Run-Time Error '1004' The macro " cannot be
found"
What is wrong?
"Dana DeLouis" wrote in message
...
Just another option. If you have a vba library reference set to
atpvbaen.xls, then you can use IsOdd / IsEven directly.
Sub Demo()
Debug.Print IsOdd(12345678901234)
Debug.Print IsEven(12345678901234)
Debug.Print IsOdd(12345678901235)
Debug.Print IsEven(12345678901235)
End Sub
returns...
False
True
True
False
--
Dana DeLouis
Using Windows XP & Office XP
= = = = = = = = = = = = = = = = =
"Tommi" wrote in message
...
How to check in VBA code if number is even (or odd)?
|