For i = 1 To 42
Sheet2.Range("B" & i + 2).Value = Sheet1.Range("B" & i * 15 -
1).Value
Next i


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Christy" wrote in message
...
Beginning with the following line of code

Sheet2.Range("b3").value = Sheet1.Range("b14").value

I need a loop that will step down 1 row on the left side and 15 rows on
the
right side each time and that will repeat 42 times.

ie:
Sheet2.Range("b3").value = Sheet1.Range("b14").value
Sheet2.Range("b4").value = Sheet1.Range("b29").value

Any help would be greatly appreciated.

Christy :)