Use vba Indexes (1 Viewer)

moke123

AWF VIP
Local time
Today, 17:55
Joined
Jan 11, 2013
Messages
3,921
my guess would be that If Len(Dir(Root2 & "" & varFldrsRoot1(i), vbDirectory)) = 0 Does not = 0
 

moke123

AWF VIP
Local time
Today, 17:55
Joined
Jan 11, 2013
Messages
3,921
Just a suggestion...
You said you have a bunch of existing folders that you need to rename.
I dont know the names or structures that you have and hopefully there are some general rules to how they were named.
I would first concentrate on fixing your existing names as this is a one-off task. Once cleaned up you can then concentrate on going forward. It would also eliminate the need for so much code.

Its pretty clear that your actual needs are a lot more complicated than what was indicated in your original post. As such I'm not sure what I provided is the best path forward for this. You may want to consider using a table for all these names. You can use fields to distinquish particular groups of folder names. You can apply filters to the recordsets to get the groupings you need.
 

Users who are viewing this thread

Top Bottom