Search data in files and folders

1. Here is error "Loop While iFoundRng.Address <> firstAddress" 91 sometimes (if i search simple data like 111 in many files);
2. Incorrect search from sheet "List".

Help plis with that, attached 4344168.xls