To me the answer is do not use .FileSearch, as it plainly do not work as
expected.
You can do it yourself in a few lines of VBA code with guaranteed results.
And no, there no need for the FSO.

NickHK

wrote in message
ups.com...
Thanks for your help.

I worked it out


it worked by deleting the

.FileType = msoFileTypeExcelWorkbooks

just posting here so if some poor preson like me ever goes searching
for this answer

thanks bye