add two sheets data into another sheet code

dennisli

Well-known Member
Joined
Feb 20, 2004
Messages
1,070
Hello, everyone,
I want to copy column A:M from row 11 to the last row of sheet name 2000 to sheet named Data from A11.
Then I want to copy column A:M from row 11 to the last row of sheet name 2001 to sheet named Data from the last empty row.
In other words, I want to add these sheets named 2000 and 2001 and paste to sheet named Data.
The following code is my try but it does not work.
I appreciate your help.
DL
Code:
 varWSnames = Array("2000", "2001")
    For Each ws In varWSnames
      ws.Activate
      LR = ws.Cells(Rows.Count, 1).End(xlUp).Row
        Range("A11:M" & LR).Select
         With Selection
          Selection.Copy
          Sheets("Data").Select
          Range("A11").Select
          ActiveSheet.Paste
         End With
    Next ws
 

Excel Facts

What did Pito Salas invent?
Pito Salas, working for Lotus, popularized what would become to be pivot tables. It was released as Lotus Improv in 1989.

Watch MrExcel Video

Forum statistics

Threads
1,129,553
Messages
5,636,976
Members
416,953
Latest member
broexc

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top