copy and paste table in another existing worksheet

  • Thread starter Thread starter Andreas Aust
  • Start date Start date
A

Andreas Aust

Hi friends,

I have a little challenge for you and a big problem for me.

I need a macro, which is able to copy the table of on one worksheet
(worksheet1) in another worksheet (worksheet2).
In worksheet2 is already a table. The macro shall be able to find in
worksheet2 the first empty row after the existing table. The row begins
for example then with cell A2563. After the macro has found this cell
the table of worksheet1 has to be pasted.

Maybe you have a solution for me.

Thanks in advance
 
Dim LastCell As Range
Set LastCell = Worksheets("Sheet2").Range("A1").End(xlDown)
Worksheets("Sheet1").Range("A1:Z100").Copy Destination:=LastCel
 
Worksheets("Sheet1").Range("A1:Z100").Copy _
Destination:=LastCell.offset(1,0)

to drop down one cell after the last used cell.
 
Back
Top