A couple of thing don't look right...
Call ApplyMacroToAllFiles("C:\test folder\")
Note the additional "\". This also looks punky...
For Each objSubFolder In objFolder
This also doesn't seem right but it's hard to tell
Call ApplyMacroToAllFiles(objSubFolder.Path)
HTH. Dave