If but with or

[Ruegen]

When using an IF in VBA



as an example if I have

IF StatusID = 3 then
StatusID = 1

end if

but I want to also change other numbers, not just 3

so 3 or 5 or 7 or 9 etc

yet I'm not sure

If StatusId = 3 or 5 or 7 then
StatusID = 1
end if

The reason I ask as I want to shorten the code and not use elseif

does any of this make sense?

[pbaldy]

You have to repeat the field:

If StatusId =3 or StatusId =5 or StatusId =7 then

[Ruegen]

ohhhh, ok that's easy enough. Thanks!

[pbaldy]

No problem. I can't remember if In() works in VBA. It would in SQL.

If Field In(3,5,7) Then

[RayMilhon]

You can Also use Select

Select Case StatusID
    Case Is =3, is = 5, is = 7
            StatusID = 1
    Case Else
            StatusID = 2

End Select

Each group can have it's own Case For example

Select Case StatusID
     Case is = 3, Is = 5, Is = 7
            StatusID = 1
     Case is = 2, Is = 4, Is = 6
            StatusID = 2
     Case is > 7
            StatusID = 10
     Case Else
            StatusID = 0
End Select