Apply a macro across a hundred workbooks, and then copying the results into a master Excel

'

Please Login or Register  to view this content.

' *Notes 1*
' The end Goal of this Macro is to copy all of the information that is in all of my workbooks,
'copy it to a tab that is called 'Combined' and then copy the 'Combined' sheet and then place it in my Target workbook.
' The Target workbook will house all of the information from 300 workbooks in one tab.
' For example, Workbook 1 has Sheet 1, sheet 2... sheets 40
' The selection of code below combines sheets 1...40 into a new sheet called 'Combined'

Please Login or Register  to view this content.

-------
'After this has taken place, I want to have the information from Combined saved into a new workbook in sheet called Sheet 1
'and then loop through all 300 workbooks, making the combine tab, coping the combine tab, and then saving it into target in the next free ROW.
'Saving in the next free row will allow my data to remain uniform.

-------
' *Notes 2*
' Here is the code that I used to to test to make sure that my DoWork function is actually creating the Combined sheet and copying my information over correctly...
' I've tried to create the Sub Batch() around this part...

Please Login or Register  to view this content.

-----
Notes 3*
So basically apply the function in Note 2 across all 300 of my workbooks and then copying the 'Combined' sheets from all 300 books and paste it all into one Sheet in Workbook Target.

Thank you for your help; I've invested quite a bit of time into this, and I hope my documentation has helped you understand what I'm trying to accomplish.

Note 4: Right now, the code opens Target workbook, copies my sheets VINCases, VINdata , Data, ... but does not Combine the sheets. Then after running through 1 workbook, it closes the previous, but then loops through creating blank sheets Sheet1, sheet2, sheet3... etc. until the macro loops through all of the workbooks in my \Files\ folder.

This works great! ... there is one small error. When combining the tabs from workbooks 1-100, it combines the tabs by next column. This is great. However, when it copies to Target, it keeps this formatting. What would make this perfect is that I need to copy the information from the combined tab, and then append the data by next row in the Target workbook... This will allow my data to be represented in a massive table.

Thank you for your help

I have made an example data set that better explains that I'm trying to accomplish.

https://drive.google.com/folderview?...kk&usp=sharing