VBA Create Folders from Excel Cells

Question

Hello,

I feel really silly asking this question, but I've been scouring the websites and I can't figure it out...

I have a list of cells with different names and I want to save a folder named after each cell (from A1 to A33), on the sheet "Feuil1". The folder where I want to save these subfolders is named "C:\Users\Marine\Dropbox".

Could you please tell me the steps I need to follow?

Thanks a million!

Marine

pilas31 · Answer

Hello,

Here is a macro that should work:

Sub Create_Folders()
Dim line As Integer
ChDir "C:\Users\Marine\Dropbox"
For line = 1 To 33
MkDir Sheets("Sheet1").Cells(line, 1).Value
Next line
End Sub

Best regards,

Babayaga3001 · Answer

Great, thanks! It works perfectly!

Babayaga3001 · Answer

Hello again,

I tried to reproduce the same thing on another Excel document - on the sheet also named "Feuil1", but the code doesn't work this time, I receive the following error message:
"Run-time error '75':
Path/File access error"

When I click on "Debug", the following line is highlighted:
"MkDir Sheets("Feuil1").Cells(line, 1).Value"

I don't understand where the problem is. It would be very kind of you to help me.

Have a nice day and thank you,

Marine

pilas31 · Answer

Hello,

I assume that in column 1 there are the names of the directories to be created.
If that’s the case, then I think this error occurs because one of the directories to be created already exists.

To find out which one, just hover over the variable "line" after clicking on "debug". A small tooltip will appear with "line=xx"

The value xx displayed is the line that is causing the problem

To check.

Best regards,

Babayaga3001 · Answer

Thank you for your help, and I'm sorry for the delay. There is indeed a problem on line 15, but I don't understand why. In particular, I changed Excel workbooks, and I believe my macro continues to reference the same workbook and creates folders coming from the one I'm no longer using (even though I delete the macro and create a new identical one). What do you think?

Thank you for your help, and Happy New Year 2014!

pilas31 · Answer

Hello and Happy New Year as well,

When the macro runs, it goes through the active sheet, so if you are positioned on the sheet that contains the list of directories to create, there is no reason for it to look for the old workbook.
Moreover, the path of the folders is provided by the following instruction:
ChDir "C:\Users\Marine\Dropbox"

You need to check that it is indeed the correct path.

Best regards,

Babayaga3001 · Answer

Hello and thank you!  Unfortunately, I have checked the path, and it is correct. Moreover, some folders from the old binder are indeed created in the right folder.  Too bad; thank you for your help!

VBA Create Folders from Excel Cells

7 réponses

Canon mb5350 - cartridge replacement impossible

Texture issues in enshrouded

Football manager (club management game)

Select next line csh foreach

Win32 kamso then rootkit detection

Win32:spyware-gen [trj] detected by avast

Unknown video error on the freebox player

Make it or break it

How to open a cbr file

Please log in with manager privileges.