VBA代码，用于从服务器搜索文件，并根据用户的按钮选择将用户路由到特定文件夹位置

我是VBA的初学者，尝试不同的方法。我在网上找到了这段代码，但它给了我一个对象错误。没有完全实现我的想法

Sub FindMaster() 
    Dim wbResults As Workbook 

    With Application.FileSearch 
        .NewSearch 
        .LookIn = "C:\" 
        .FileType = msoFileTypeExcelWorkbooks 
        .Filename = "Master.xls" 
        If .Execute > 0 Then 'Workbooks in folder
            Set wbResults = Workbooks.Open(Filename:=.FoundFiles(lCount), UpdateLinks:=0) 
        Else 
            MsgBox "Not found" 
        End If 
    End With 

是否有更好的方法通过userform下拉列表搜索文件，但首先代码必须检测用户是否具有文件夹访问权限，然后将用户路由到特定的文件或文件夹

---

感谢应用程序。文件搜索已在Excel 2007中删除。请参阅：

Application.FileSearch

已在Excel 2007中删除。见：