How to Construct a Column Variable for Range

[Cyberdude]

I have a series of variables (Col1, Col2, ...) for column letters. If I substitute a variable for the column letter:
Range(Col1 & 3).Select
it works just fine.
I would like to create a loop that looks something like:

Dim Col1 As String, Col2 As String
Col1 = "A"
Col2 = "F"
For N=1 To 2
    Range("Col" & N & N + 2).Clear
Next N

This of course doesn't work because it would create something like:

Range(Col12).Clear

In fact it might create something like:
Range("Col"12).Clear (I'm not sure)
What I need is something like the Excel "Indirect" function, I think.

Range(Indirect("Col" & N) & N + 2).Clear

In any case I'm going crazy trying to figure it out.
Any ideas?

[Bob Phillips]

I have a series of variables (Col1, Col2, ...) for column letters. If I substitute a variable for the column letter:

Range(Col1 & 3).Select

it works just fine.
I would like to create a loop that looks something like:

Dim Col1 As String, Col2 As String
Col1 = "A"
Col2 = "F"
For N=1 To 2
    Range("Col" & N & N + 2).Clear
Next N

This of course doesn't work because it would create something like:

Range(Col12).Clear

In fact it might create something like:
Range("Col"12).Clear (I'm not sure)
What I need is something like the Excel "Indirect" function, I think.

Range(Indirect("Col" & N) & N + 2).Clear

In any case I'm going crazy trying to figure it out.
Any ideas?

Dude,

Try an array

Dim ColArray
Dim N As Long
    ColArray = Array("A", "F")
    For N = 0 To 1
        Range(ColArray(N), N + 3).Clear
    Next N

[Cyberdude]

Hey, xld, that looks promising ... I'll give it a try. Thanx.

[Bob Phillips]

Hey, xld, that looks promising ... I'll give it a try. Thanx.

If you do, get it right (as I didn't)

ColArray = Array("A", "F")
    For N = 0 To 1
        Range(ColArray(N) & N + 3).Clear
    Next N

[Cyberdude]

Hey, xld, the array solution works (and I did spot the missing "&"). That's a BIG help in reducing my code lines.
Thanx.