List folders without using FSO

I am trying to return an array of folder names without using FSO. Is there anyway Dir can be used to return folders only?

Below is code I am trying to alter to return folder names

Please Login or Register  to view this content.

You can And the attributes (via GetAttr) with vbDirectory to see if it's a file or folder.

Originally Posted by shg

You can And the attributes (via GetAttr) with vbDirectory to see if it's a file or folder.

Thanks shg. When I use get attributes and vbDirectory, it returns a few files in addition to the folders.

Try this.

Please Login or Register  to view this content.

@b2: Thank you.

@shg: You're welcome and many thanks for rep points.

Thanks bakerman! (Reps) It works.


For anyone who found on this thread while searching for a solution, the finished code is below:

Please Login or Register  to view this content.

@ mc84excel

You're welcome and thanks for the rep points.