If this is a Cut/Paste, there is a clue in that your

Sub Macro1()

ends with
end sub ' No big "E"

instead of with
End Sub ' Big "E"

The words "End Sub" should also be highlighted to indicate they are
recognized.

Also, a Call has no () unless passing variables:

The line
taskfinder()
should be
taskfinder
or
Call taskfinder


If you put the word "Call" in there, it will be highlighted to
indicate it is recognized as you enter it.