Macro to compare two sheets and then copy if match
 

I need a macro be able to lookup one sheet and when it finds a word it
that is the same in sheet 2 it will replace the row with SUBTOTAL
forumlas for the data above them until it reaches the first blank cell.

There are multiple words in sheet 2 that the macro should find in sheet
1 so I would like to be able to change the macro to suit my needs.

Can someone please help with this one?

Thank you

Andrea