One way:

For i = 1 to 20
Range("A" & i & ":F" & i).Select
Next i

another:

For i = 1 to 20
Range("A" & i).Resize(1, 6).Select
Next i

another:

For i = 1 to 20
Cells(i, 1).Resize(1, 6).Select
Next i



In article ,
"Yiu Choi Fan" wrote:

Hi all,

I would like to define a range with variant in VBA program. For example,
inside a for-loop, when i=1, the selected range is Range("A1":"F1"); when
i=2, the selected range will be Range("A2":F2") and so on. But I don't know
how to define such "Range". Can anyone help me? Thanks a lot!!

C.F. Yiu