Hi,

You can use

For I = 1 to 100 'Or more times
Sheets("2").cells(1+I,1).value = Sheets("1").cells(1+I,1).value 'this is
for the 1º column
Sheets("2").cells(1+I,2).value = Sheets("1").cells(1+I,2).value 1 'for the
2º column

Next I


"MFR" escreveu:

need to create a loop that copies each row to a different sheet. . . . .
.row2 to sheet(2).range (A2), row3 to sheet(3) range (A2) etc. from
a single worksheet.