Use Mod?

[dinotom]

I am trying to test to see if a certain number is a multiple of 25 , ie its 25,50,75,100 etc etc

something like;
If myNumber is a multiple of 25 then
Else
rest of code
End if

 

[dcardno]

there is no VBA MOD operator, so you will have to use something like:

If WorksheetFunction.MOD(MyNum, 25) = 0 then
   do stuff
End If
...

 

[shg]

if myNumber mod 25 = 0 then

 

[pgc01]

Hi Thomas

Just a remark: be careful when using Mod. The Mod() worksheet function and the Mod vba operator have the same name but do not always behave in the same way. Be sure to check the help before using them.

 

[shg]

For testing for zero it doesn't matter, but the MOD function always returns a non-negative number, while the Mod operator returns the smaller of the positive and negative modulus, and Mod rounds its arguments to Long.

 

[shg]

while the Mod operator returns the smaller of the positive and negative modulus

That's not exactly correct ... maybe I can fix it.

 

[pgc01]

Yes, I was just reminding that they are false friends, they look the same but they are not the same.

That's not a problem here, anyway, there's no Mod() method in the WorksheetFunction object (or, at least there didn't use to be, can't check here in recent versions of Excel). If one wanted to use the Mod() worksheet function in vba, one would have to, for ex., use Evaluate().

 

[shg]

The num1 Mod num2 returns a number with the same sign as num1.