After I already define the path where to search and after I already define text/string which one to search, the following message occurs:

"Run-time Error '424':

Object required"

If I click on button Debug then yellow background in on the following text of code ''If FSO Is Nothing Then'' and therefore the yellow arrow is on the left side of the following line:

If FSO Is Nothing Then Set FSO = CreateObject("scripting.filesystemobject")