Copying data from multiple workbooks into one

**seigna** · 10-06-2014, 05:47 PM

Hi everyone!

I am having a problem with the code below. I have above 1000 excel files, all of which are workbooks with one sheet. I am trying to copy data from these workbooks and paste them one after another in one new workbook in the same worksheet one after the other.

I wrote the following code but it doesn't execute what I want.

The data I am copying is a range of 97 rows and 5 columns from A to F. I want to copy these data into a worksheet one after the other, in a descending order.

Would anyone be able to take a look at this code?

Thank you in advance!

Please Login or Register  to view this content.

**JBeaucaire** · 10-06-2014, 06:22 PM

I could reinvent the wheel with you, but here's a ready to use macro... you need only edit the parts in red to point to your source folder...

'WORKBOOKS TO 1 SHEET STACKED
Here's a macro for collecting data from all files in a specific folder.

Workbooks to 1 Sheet

The parts of the code that need to be edited are colored to draw your attention.

Down in the section "This is the section to customize" you would make that same edit for Range("A2:E97").Copy .

**seigna** · 10-07-2014, 05:42 AM

I have looked at your code and I am trying it out. However I was wondering what is wrong with my code that it doesn perform the action?

Moreover, as I try to execute it, I obtain an error telling me that the variable is not defined for msoFileDialogOpen

Please Login or Register  to view this content.

**seigna** · 10-07-2014, 05:45 AM

Let's say that i am trying to stack data in this format into a new worksheet

**JBeaucaire** · 10-07-2014, 05:48 AM

I apologize, after 100s of people have used the given code to accomplish this task, I'm going to defer to it rather than decipher other codes attempting to do the same thing.