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

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

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

"Srikanth Ganesan" skrev i melding
...

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

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

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 ...

--
Earl Kiosterud
mvpearl omitthisword at verizon period net
-------------------------------------------

"Srikanth Ganesan" wrote in message
...

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

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

Thanks a ton

Srikanth

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!