Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Retrieve Names of Subdirectories
- Thread starter Kocheace
- Start date
You can try something like this:
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("\path\to\directory")
For Each sf in f.SubFolders
MsgBox sf.Name
Next sf
You may reference the Scripting Runtime Library
Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder("\path\to\directory")
For Each sf in f.SubFolders
MsgBox sf.Name
Next sf
You may reference the Scripting Runtime Library
Hope This Help, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884
- Thread starter
- #4
- Status
Similar threads
- Locked
- Question
- Locked
- Question
- Locked
- Helpful tip
