FileSystemObject : GetFolder Method

Description:

Returns a Folder object corresponding to the folder in a specified path.

Format : 

objectOfFileSystemObject. GetFolder(folderspec)

Arguments: 

• objectOfFileSystemObject
  • As the names says, it’s a FileSystemObject.

• folderspec
  • Mandatory
  • Type:     String
  • Specific folder path

Function FnGetFolderList(strSpecificFolderPath)

    Set fso = CreateObject("Scripting.FileSystemObject")

    Set folder = fso.GetFolder(strSpecificFolderPath)

    Set subFolders = folder.SubFolders

    strFolders = ""

    For Each fld in subFlds

        strFolders = strFolders & fld.name

        strFolders = strFolders & " "

    Next

    FnGetFolderList= strFolders

End Function

 Msgbox FnGetFolderList ("c:\New Folder")

Also Read:

1. Excel-VBA : Insert Multiple Images from a Folder to Excel Cells
2. FileSystemObject : CopyFile Method
3. FileSystemObject : FileExists Method
4. FileSystemObject in Excel Macro
5. FileSystemObject:OpenTextFile Method