Hi,

I was using the following code in Excel 2003 to look in the specified
folder, and open files with ".xls" extension, and then do something
with the file.

With Application.FileSearch
.NewSearch
.LookIn = "D:\rspData"
.Filename = "*.xls"
If .Execute() 0 Then
For i = 1 To .FoundFiles.Count
varname = .FoundFiles(i)
Workbooks.Open Filename:=varname

In Excel 2007, FileSearch is giving an error. How could I achieve what
I want either by changing the code above or using some other code?

Thanks in advance for all the help.

Regards,
Raj