VBA equivalent to SQL 'in' function

Question

I'm writing a conditional statement in vba like

if(userID = 1 or userID = 2 or userID = 3 or userID = 4) then
...

I was wondering if there's a quicker, cleaner way to do this. Something like

if(userID in (1,2,3,4)) then
...

Thanks

Answer 1

An alternative would be:

select case userID
    case 1,2,3,4,5,6
       ' do something
end select

It conveys very good the meaning of the if ... then ... else construct.