Split worksheets in multiple workbooks in folder

[Eric09]

I have about 400 Excel workbooks in a folder, all of which have 1 sheet of data. I have been searching for the VB code which will split the worksheet by column Y into separate sheets. I have found the code which will perform this as well as code which is intended to run the same code on ALL workbooks in a folder. I've tried putting the two sets of code together, but it keeps running the code for the active sheet only. How can I get this to run on all workbooks in a folder?

Please Login or Register  to view this content.

[patel45]

I have about 400 Excel workbooks in a folder, all of which have 1 sheet of data. I have been searching for the VB code which will split the worksheet by column Y into separate sheets.

Can you explain better ? do you want extract each column save as new sheet ?

[Eric09]

I want to split all 400 workbooks by the value in column Y, 1 sheet for each value. I got this to work for one workbook with this code:

Please Login or Register  to view this content.

I was able to delete the original sheet and the other two default sheets, so that I would end up with only the sheets produced with the code above. Again, I want to loop this function through all 400 as well.

Please Login or Register  to view this content.

Now I want to it to loop through 400 workbooks in a folder, and perform these two functions. All workbooks have the same columns and structure, just different names and data.

[patel45]

to open all files in a folder and change them

Please Login or Register  to view this content.

[Eric09]

That did it. Thanks!