How to use Like function VBA?

I am new in VBA could you please help me for this loop please. It is a simple copy and paste with a if.