Create Folder

[Me.Maazaa]

Hi Forum Members.

Need help to create a folders and subfolders based on the data on two worksheets.
I have attached the outline/excel file as well.

Sheet2:
Column B \ Cell B4 onwards contains the name of the master folder created under the path given on the sheet1 (below).

Sheet1:
Contains default path in cell B1 for creating the master folders from sheet2 data.

For every master folder, which is created from sheet2 data, i want to create 3 levels of subdirectories under master folder.

Example

Sheet2\B5 Value is CCC. Thus, the macro would create the folder "ccc" on desktop.
In Folder CCC, we will have 11 folders (Level-1-1 through Level-1-11)
In Folder Level-1-1, we will have folders Level-2-1 & Level-2-2 and so on.....

----------------------------------------------------------------------------


If the folder name already exists, i want to skip doing anything to that folder.

If possible, the macro would be triggered based on the pushbutton on sheet2.
The master folder name would the value in the cell that was selected just before pushing the pushbutton.
-----------------------------------------------------------------------------------------
Thanks in advance!

[kev_]

Welcome to the forum

After you have tested code, remove the apostrophe on line below to allow folder creation

Please Login or Register  to view this content.

Testing
To test in attached workbook
- amend the value in cell B2 (sheet1) to the full path to the folder that "CCC" wil be created in
- select "CCC" in sheet2 and press the button

Notes
1. Sheet1 amended to make it easier to write VBA
- column B must always contain a value, and column C must contain a value whenever cell in column D is not empty
2. A Collection is used to hold the list of sub folders to be created
3. MKDIR must create folders in the correct sequence starting at the TOP level
- Items are placed in Collection in the corrrect sequence to satisfy MKDIR requirements
(master folder, followed by all Column B, followed by all Column C, followed by all Column D)
4. Folder list is written to sheet "FoldersCreated"
5. MKDIR creates the new folder ( remove " ' " to make it work )
6. Folders that already exist are ignored

Caveat
The code does not check for illegal characters
- be aware that some characters are not allowed in folder names such as
< (less than) > (greater than) : (colon)" (double quote) / (forward slash) \ (backslash) | (vertical bar or pipe) ? (question mark) * (asterisk)
- if some folders are not created that may be the reason

My Results
The code has been tested - here is what it created for me
(all the layers may not be showing, but all were present)
.
Folders.jpg
.
The code

Place in Standard Module

Please Login or Register  to view this content.

[Me.Maazaa]

This worked perfect. Thank you very much kev_.

[kev_]

Glad to help
Please mark thread SOLVED (ThreadTools@TopOfThread)







Click *Add Reputation to thank those who helped you. Ask if anything is not clear