Oops,

You need to add this bit of code to the main code. Yow will put it above the "Next Item"
Fpass = False

Otherwise sheet1 will not get populated when you let code run for all of the workbooks.

Sorry...