Scribd
Upload
59 views

Merge Worksheets Code

The document describes how to consolidate data from multiple Excel worksheets into a summary worksheet. It provides code to copy a specified range or all rows except the header from each worksheet and paste it into a new summary sheet. The code allows excluding specific worksheets and adds or updates the summary sheet each time it is run. Tips are provided on the referenced website to help users understand and modify the code for their needs.

Uploaded by

Addin Grahaddin Affandi
Copyright
© © All Rights Reserved
Available Formats
Download as XLS, PDF, TXT or read online on Scribd
59 views

Merge Worksheets Code

The document describes how to consolidate data from multiple Excel worksheets into a summary worksheet. It provides code to copy a specified range or all rows except the header from each worksheet and paste it into a new summary sheet. The code allows excluding specific worksheets and adds or updates the summary sheet each time it is run. Tips are provided on the referenced website to help users understand and modify the code for their needs.

Uploaded by

Addin Grahaddin Affandi
Copyright
© © All Rights Reserved
Available Formats
Download as XLS, PDF, TXT or read online on Scribd
You are on page 1/ 12

Cell A2 of Sheet1 Cell B2 of Sheet1 Cell C2 of Sheet1 Cell D2 of Sheet1 Cell E2 of Sheet1

Cell A2 of Sheet2 Cell B2 of Sheet2 Cell C2 of Sheet2 Cell D2 of Sheet2 Cell E2 of Sheet2
Cell A2 of Sheet3 Cell B2 of Sheet3 Cell C2 of Sheet3 Cell D2 of Sheet3 Cell E2 of Sheet3
Cell A2 of Sheet4 Cell B2 of Sheet4 Cell C2 of Sheet4 Cell D2 of Sheet4 Cell E2 of Sheet4
Cell F2 of Sheet1 Cell G2 of Sheet1 Sheet1
Cell F2 of Sheet2 Cell G2 of Sheet2 Sheet2
Cell F2 of Sheet3 Cell G2 of Sheet3 Sheet3
Cell F2 of Sheet4 Cell G2 of Sheet4 Sheet4
Consolidate Data from Multiple Worksheets into a Summary Worksheet in Excel
http://www.rondebruin.nl/copy2.htm

In this workbook you can test the code from the page above
Because I also want to exclude the Information worksheet I use

If IsError(Application.Match(sh.Name, _
Array(DestSh.Name, "Information"), 0)) Then

Instead of: If sh.Name <> DestSh.Name Then that you see in the code on my website.
You can add more sheet to the Array if you want.

You can try each example with one of the buttons below or use Alt F8 to
select one of the macros in the macro list and press Run.

Copy this range from every sheet : Range("A2:G2")

Copy all cells except row 1 (for example the header)

Copy column A from each sheet after the last column with data

When you run one of the examples it will first delete the summary worksheet
named RDBMergeSheet if it exists and then adds a new one to the workbook.
This ensures that the data is always up to date after you run the code.

*****READ THE TIPS on the website below the first macro****


heet in Excel
Header 1 Header 2 Header 3 Header 4 Header 5
Cell A2 of Sheet1 Cell B2 of Sheet1 Cell C2 of Sheet1 Cell D2 of Sheet1 Cell E2 of Sheet1
Cell A3 of Sheet1 Cell B3 of Sheet1 Cell C3 of Sheet1 Cell D3 of Sheet1 Cell E3 of Sheet1
Cell A4 of Sheet1 Cell B4 of Sheet1 Cell C4 of Sheet1 Cell D4 of Sheet1 Cell E4 of Sheet1
Header 6 Header 7
Cell F2 of Sheet1 Cell G2 of Sheet1
Cell F3 of Sheet1 Cell G3 of Sheet1
Cell F4 of Sheet1 Cell G4 of Sheet1
Header 1 Header 2 Header 3 Header 4 Header 5
Cell A2 of Sheet2 Cell B2 of Sheet2 Cell C2 of Sheet2 Cell D2 of Sheet2 Cell E2 of Sheet2
Cell A3 of Sheet2 Cell B3 of Sheet2 Cell C3 of Sheet2 Cell D3 of Sheet2 Cell E3 of Sheet2
Cell A4 of Sheet2 Cell B4 of Sheet2 Cell C4 of Sheet2 Cell D4 of Sheet2 Cell E4 of Sheet2
Header 6 Header 7
Cell F2 of Sheet2 Cell G2 of Sheet2
Cell F3 of Sheet2 Cell G3 of Sheet2
Cell F4 of Sheet2 Cell G4 of Sheet2
Header 1 Header 2 Header 3 Header 4 Header 5
Cell A2 of Sheet3 Cell B2 of Sheet3 Cell C2 of Sheet3 Cell D2 of Sheet3 Cell E2 of Sheet3
Cell A3 of Sheet3 Cell B3 of Sheet3 Cell C3 of Sheet3 Cell D3 of Sheet3 Cell E3 of Sheet3
Cell A4 of Sheet3 Cell B4 of Sheet3 Cell C4 of Sheet3 Cell D4 of Sheet3 Cell E4 of Sheet3
Header 6 Header 7
Cell F2 of Sheet3 Cell G2 of Sheet3
Cell F3 of Sheet3 Cell G3 of Sheet3
Cell F4 of Sheet3 Cell G4 of Sheet3
Header 1 Header 2 Header 3 Header 4 Header 5
Cell A2 of Sheet4 Cell B2 of Sheet4 Cell C2 of Sheet4 Cell D2 of Sheet4 Cell E2 of Sheet4
Cell A3 of Sheet4 Cell B3 of Sheet4 Cell C3 of Sheet4 Cell D3 of Sheet4 Cell E3 of Sheet4
Cell A4 of Sheet4 Cell B4 of Sheet4 Cell C4 of Sheet4 Cell D4 of Sheet4 Cell E4 of Sheet4
Header 6 Header 7
Cell F2 of Sheet4 Cell G2 of Sheet4
Cell F3 of Sheet4 Cell G3 of Sheet4
Cell F4 of Sheet4 Cell G4 of Sheet4

You might also like