Merging Tables

Hello,

I have 40 Sheets in a Workbook that represent different manufacturers.

On each Sheet, there is an identical table (placement, formatting, column titles, etc.). The only difference betwene tables are the products listed in the table (below the column titles/headers).

How would I merge every single table into one very large table?

Hello.

Below code consolidates all worksheets in blank workbook, inserts source sheet names in Column A, saves new workbook in the same folder with source workbook.

copy and paste the code in a standard module of the source workbook.

Please Login or Register  to view this content.

It almost looks like it is working until it bugs here:

Please Login or Register  to view this content.

any blank worksheets in the workbook?

I re-ran and it worked perfectly. I think it may have been because there were images on the pages or I had a blank sheet like you suggested. I deleted all and it ran wonderfully.

i'm glad it helped.