combine 1st sheet from all workbooks in folder

Here is the issue and I am not sure if it is even possible but I figured I would give it a try.

I have a folder with 24 generated workbooks. Each workbook has the same number of worksheets and the same format.

In each workbook the first sheet is what I need and each first sheet is named "CHART"

I need a Macro that will take all workbooks in this folder, we can call the folder C:\combine, and copy the first sheet of each workbook into a combined workbook of 24 worksheets. The sheet names do not matter because I have a program that will auto name the tabs based on a list.

Anybody have a good ideas?

Thanks

Select the files to combine in the dialog.

Please Login or Register  to view this content.

Ran the program and it came back with "Run time error 1004: Copy Method of Worksheet class failed

Please Login or Register  to view this content.

The red line is where the debug brought me

Nothing that I try creates that error (protection, hidden sheets, sharing). Does it fail on a specific workbook, or on the first workbook?

First workbook, which has about 9 hidden sheets.

I also just tried it will 4 test workbooks and the same thing happened

Can you post an example workbook that is giving the error? Cleaned up, if there is sensitive information.

Fixed it, it was because i was saving it under Personal.xls.