FileSearch 属性

       

返回一个 FileSearch 对象,该对象可用于以绝对路径或相对路径的方式搜索文件。只读。

示例

本示例显示“My Documents”文件夹中所有以“New”开头的文件名称。

With Application.FileSearch
    .FileName = "New*.*"
    .LookIn = "C:\My Documents"
    .Execute
    For I = 1 To .FoundFiles.Count
        MsgBox .FoundFiles(I)
    Next
End With