Macro move folder and rename

[Bodz]

Hi All,

Wonder if anyone out there can help with this one.
I've created a macro which does the following:-
1. Creates a new folder within a folder.
2. Creates two more subfolders within the folder above.
3. Saves the active workbook to one of the subfolders and allows you to name it.

All of the above works very nicely except for two problems:-

1. When you try and run the macro again, a message appears telling you that the folder already exists.
In order to prevent this, one has to manually delete the folder.

2. The code that should alter the folder path does not seem to work.

My idea (this is the question/problem)is to rename the folder and/or move it to another location.

Any help would be much appreciated.

The code so far is shown below.

Please Login or Register  to view this content.

[antoka05]

See if this code can help you (each section is complete; if you copy more than one section delete the first two rows (dim and set) from the sections other the first):

Please Login or Register  to view this content.

Regards,
Antonio

[ern2ern]

Antonio,

I tried this after placing an xls file in the last folder.
'---> DELETE A PATH <---

Please Login or Register  to view this content.

I got permission denied but it deleted the file.
Only after I exit and reopen Excel would it delete the folder.

Do you know of a way to do it within the same Excel session?

Thanks,
-ern2ern

[antoka05]

I think the problem is you try to delete a path where you opened a file and the file lock the path.

I think you can't delete it if there are opened files.

Regards,
Antonio

[Bodz]

Hi Guys,

Thanks for your input so far. I have tried the code you suggested but it does not do what I want it to.
Essentially, I need to move a folder containing two subfolders, including the files, from one directory to another.

Any further suggestions.

Bodz

[antoka05]

Did you try to use this code:

Please Login or Register  to view this content.

I hope you can fix your problem
Regards,
Antonio