How to change the index value inside Range Object with For Loop

[dmadhup]

Hi,
I have following code:n = 2
For i = 1 To 5 Step 1
quantityArray = Worksheets("Sheet1").Range("O13:S13").Value
n = n + 6
Next

In for loop,
when i=2 then I want to change Range object like Range("O14: S14") and
when i=3 then I want to change Range object like Range("O15: S15") and gradually....


Any help towards this is highly appreciated. Thanks

 

[Joe4]

One way:

[COLOR=#333333]For i = 1 To 5 Step 1[/COLOR]
[COLOR=#333333]    quantityArray = Worksheets("Sheet1").Range("O" & i + 12 & ":S" & i + 12).Value[/COLOR]
[COLOR=#333333]    n = n + 6[/COLOR]
[COLOR=#333333]Next[/COLOR]

 

[Fluff]

How about

For i = 1 To 5 Step 1
quantityArray = Worksheets("Sheet1").Range("O" & i + 12).Resize(, 5).Value
Next

 

[dmadhup]

Thank you all for the prompt response and make it works.

 

[Fluff]

Glad we could help & thanks for the feedback