Application.FileSearch on only one level of sub folders

[Crustysquirrel]

I want to use Application.FileSearch to search for xls files in the second
level of a folder structure. I have many folders with the target xls files in
each folder. But then an 'archive' folder attached to the folder with more
xls files with the same name. Everytime it searches I end up with the main
file and the archive file.

Due to the number of folders, I need to use the .SearchSubFolders = True
property, but is there any way of telling it to only go down one level?

Level 1
|__ Level 2...
| |__ ****.xls - WANT TO SEARCH THESE
| |__ Level 3...
| |__ ****.xls - NOT THESE
|__ Level 2...
|__ Level 2...

The extract of code I have is:

With Application.FileSearch
.NewSearch
.LookIn = "c:\temp\amp test"
.Filename = "933_????.xls"
.SearchSubFolders = True
.FileType = msoFileTypeExcelWorkbooks
If .Execute() > 0 Then ......................blah blah blah

Any help on this would be great, thanks.

 

[Tom Ogilvy]

No, but you can easily put in an if statement when working with the results
and only process those found at the second level.

 

[Crustysquirrel]

That is great, thanks for your help Tom. I will have to see how the IF is
going to fit in with my code.

 

[NickHK]

Crusty,
There is an earlier thread "Macro won't run from d: drive, but works on c:
drive", from 29/07/05 that highlights the inadequanies of .FileSearch.
A Dir() for all the directories, then Dir() each directory should be easy
enough.

NickHK