Dear all,
I am new to excel. I am stuck with this code, do not know why it is not working.any clue will be very helpful, thanks
Sub copy() i = Sheets("sheet2").Cells(Rows.Count, 2).End(xlUp).Row j = Sheets("sheet1").Cells(Rows.Count, 1).End(xlUp).Row + 1 Sheets("Sheet2").Range(Cells(1, 1), Cells(i, 10)).copy Destination:=Sheets("Sheet1").Range(Cells(j, 1), Cells(j + i, 10)) End Sub
Bookmarks