Search Text Excel All files & Subfolders

I would like run a vba script that will search for a text lets say "ACDC" under the following path "C:\Music" including all subfolders for excel files ending .xls or .xlsm that contain a text and if found place full directory name and file name on new workbook. I've found this by Allen Wyatt but it doesn't search including subfolders. It also doesn't search both .xls and .xlsm at the same time but thats not a big deal unless someone feels like adding that in too.

Can someone either assist in modifying the code below to including searching including subfolders or write a new code? Much thanks.

Please Login or Register  to view this content.

This requires Microsoft Scripting Runtime to be set. In the VBA Editor, click Tools...References....Microsoft Scripting Runtime. Run the ListFileNames macro. The result will be returned to "Sheet1" of the workbook with the macro.

Please Login or Register  to view this content.