Search worksheets in folder and sub folders

[Bob Phillips]

figured out it needs a ref to msfile scripting object, and changed the line

Set FSO = CreateObject("SCripting.FileSy*stemObject")

to

Set FSO = CreateObject("Scripting.FileSystemObject")

then works fine

Glad you got it to work, don't know where that * came from.

BUTyou don't need to set a reference, my code is late binding.