SubFolders 属性

返回一个 文件夹 集合,该集合包含指定文件夹中包含的所有文件夹,包括设置了 Hidden 和 System 文件属性的文件夹。

语法

对象文件夹

对象始终是 Folder 对象。

备注

以下代码演示如何使用 SubFolders 属性。

Sub ShowFolderList(folderspec)
    Dim fs, f, f1, s, sf
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set sf = f.SubFolders
    For Each f1 in sf
        s = s & f1.name 
        s = s &  vbCrLf
    Next
    MsgBox s
End Sub

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。