application filesearch XL2000 strange behaviour

[jimrward]

this is a strange one, I am using XL2000 to search a series of folders containing WD2000 files for text within a document

On one folder only the macro will abort and shut down Excel when the search term is a single word, when it is a single letter, it will perform the search.

All other folders are fine, I have checked folder attributes and permissions, all seem to be similar across folders

The code is standard as found all over the net
With Application.FileSearch
.NewSearch
.LookIn = FolderToSearch
.SearchSubFolders = True
.FileName = "*.doc"
.MatchTextExactly = False
.TextOrProperty = TextToFind
.FileType = msoFileTypeWordDocuments
' .FileTypes.Add msoFileTypeExcelWorkbooks ' so we can AND in other file types

.Execute

It dies on the .execute when the TextToFind is a string of characters, all other variables are correctly loaded

The error is not trappable, and does not appear in system logs or Dr Watson

Anyone else seen this

 

[jimrward]

UPDATE in case anyone gets this problem

Turned out to be a corrupt MSWORD file in the folder, found by removing all files from folder and adding in one by one.

opened the bogey MSWORD file selected and copied all contents, closed MSWORD, opened up MSWORD and pasted contents back into fresh document and saved, all working fine

Closing call