Macro to combine multiple sheets from multiple workbooks

Please wrap your code with code tags.
The change you need to make are on the followings lines:

Please Login or Register  to view this content.

This below line copies all columns from A-R. You need to change a3 and r

Please Login or Register  to view this content.

thank you. Can we add a piece to the code that combines all Sheet 1's in one worksheet and all Sheet 2's in another?

First, the code does not loop around worksheets–it picks the only one sheet on a workbook. We can change the code to pick up more than one sheet, but this will slow the execution time as the code has to go through not only on each workbook but each sheet. There is also another miner issue: the code right now uses sheet(1)– it uses the index position of a sheet, so if we were to change it to look at sheet name, it will be another delay in execution.

This is how I resolve the issue: since the names of each sheet are copied in to column A of the master sheet, it would much faster and easier to dump all sheets in to master as the code does now, then filter it by column A– using sheet(1) to separate them in to two sheets