Need to split a workbook with 400 sheets

**billmontoya** · 04-11-2013, 09:14 AM

I am looking for a macro that splits a workbook "UNit Test.xlsx"/ This workbook has 400 sheets containing individual test scripts. I need to create new workbooks from each single worksheet from the main Workbook using the name of the sheets.
E.g
Unit Test.xlsx has sheets:
UT001, UT002, UT003 and so on to UT400

The macro needs to:
1. get the name of the first sheet
2. Move the sheet into a new workbook
3. save the new workbook using the a predefined directory path where all the new workbooks will reside.
4. go back to the main workbook (which would be having active the next sheet in the count since trhe active one was nmoved and saved into another workbook)
5. Do this till no more sheets exist.

This would create 400 sheets for me in no time instead of doing all that hard work manually.

Your help is very much appreciated.

**arlu1201** · 04-11-2013, 09:40 AM

Try this - it will create a temp sheet as the file has to have a minimum of 1 file in it.

Please Login or Register  to view this content.

Copy the Excel VBA code
Select the workbook in which you want to store the Excel VBA code
Hold the Alt key, and press the F11 key, to open the Visual Basic Editor
Choose Insert | Module
Where the cursor is flashing, choose Edit | Paste

To run the Excel VBA code:
Choose View | Macros
Select a macro in the list, and click the Run button

**billmontoya** · 04-11-2013, 06:12 PM

Thank you very much. It worked very well.
YOU ROCK!!

**arlu1201** · 04-12-2013, 02:15 AM

Based on your last post in this thread, its apparent that you are satisfied with the solution(s) you've received and have solved your question, but you haven't marked your thread as "SOLVED". I will do it for you this time.

In future, to mark your thread as Solved, you can do the following -
Select Thread Tools-> Mark thread as Solved.

Incase your issue is not solved, you can undo it as follows -
Select Thread Tools-> Mark thread as Unsolved.

Also, since you are relatively new to the forum, i would like to inform you that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post which helped you. This adds to the reputation of the person who has taken the time to help you.