FileSearch对象是Office系统在2002版本新增加的对象。用FileSearch 属性可返回 FileSearch 对象，可实现查找指定文件并显示找到的文件数及每个找到的文件的标题。With Application.FileSearch    .NewSearch    .LookIn = "C:\My Documents"    .SearchSubFolders = True    .FileName = "Run"    .MatchTextExactly = True    .FileType = msoFileTypeAllFilesEnd With使用注意:     需要引用Microsoft Office 10.0 Object Library 或更高版本