MOD function

[Srikanth Ganesan]

Hello,

How do I do the following in a macro

IF MOD(n,2) = 1 Then posX = -190 Else posX = 150


where n is an integer, posX is a Long.

Srikanth

 

[Harald Staff]

Hi Srikanth

Sub test()
Dim N As Long
Dim posX As Long
For N = 1 To 6
posX = 150 - (N Mod 2) * 340
MsgBox N & Chr(10) & posX, , "demo"
Next
End Sub


HTH. Best wishes Harald

 

[Earl Kiosterud]

Srikanth,

There is no MOD function in VBA, but there is a Mod operator. So you would
write:

IF n Mod 2 = 1 then
PosX = -190 ...

 

[Srikanth Ganesan]

Thanks a ton

Srikanth