Find Text String across Multiple Workbooks

Hi All,

After much searching for the VBA to answer my Thread Title I cannot find exactly what I need.

The Scenario:

Have a Workbook with one sheet and at Cell A2 input a search String....select a CommandButton and it will open up each File in a particular folder, search for the string and if not found close it without Saving but if it does find the string, macro stops at the cell where found and a MessageBox pops up stating as example "Search Complete - Account Found".

Also if the string is not found in any of the Workbooks a MessageBox returns "Account Not Found - Check The Account ID" - this will prompt user to check their typing for errors.

Code I have for Opening each Workbook is:

Please Login or Register  to view this content.

Can anyone help me fill in the missing code?

Yours in Anticipation

Craig

Hi tehneXus,

Thanks for quick response.

I am getting a Run-time error '438' object doesn't support property or method at this line:

For Each xlWs In wbkTemp

Any Ideas?

Craig

Please Login or Register  to view this content.

TYPO =looat

Hi tehneXus,

Thanks...amendment put in and ran a couple of testers and all working brilliantly...Many Thanks.

AB33: Spotted typo, but thanks for bringing my attention to it as could have missed it.

Kind Regards

Craig