Hi Stuart,

With the problematic workbook open, in the VBE:

Tools | References

and check that you have a reference set to the MS office object library.


---
Regards,
Norman


"Stuart" wrote in message
...
Have just moved up from 98 to xp and have found that the following code
will not work, any ideas why ???

at the ".FileName" line i am getting a runtime error 5 "Invalid procedure
call or argument"
It only throws this fault if it finds a file, i.e. if I used "*.hhh" the
problem does not arisre because it will not find any such files


With Application.FileSearch
.LookIn = "C:\Myfile\Preview"
.SearchSubFolders = False
.FileName = "*.jpg"
.Execute
For i = 1 To .FoundFiles.Count

Next i
End With