hope someonde is smart enough?!?!
 

If you are confident that there are no other errors in
your code, then the easiest way is to add the following
lines at the top and bottom of your code:

On error resume next

... your code here...

On error goto 0

What this does is force VBA to advance to and execute the
next line of code any time an error is generated, so it
will circumvent the problem with invalid "Find"s. The line
at the end simply re-enables errors.
As I said at the start, make sure the rest of the code the
Find statements trigger works the way you want before
adding this or all kinds of strange things might happen
and you wont know why!!

Cheers, Pete