If you don't like working with strings, perhaps another option might be
something like this...

n = 2
Intersect([A1,C1,E1,G1].EntireColumn, Rows(1).Resize(n)).Select

--
Dana DeLouis
Using Windows XP & Office XP
= = = = = = = = = = = = = = = = =


"Michalll" wrote in message
om...
Help me please,

I need make a multiple selection in VBA but vith variable.

My example which works:
range("A1:A2, C1:C2").select

I need something like:
value = 2
range("A1:A & value, C1:C & value").select

but it does not work, would you help me?

thanx

Michal