Macro to Extract data from Sheet1 to sheet Sales Based on specific Criteria

I have Data on sheet1


I need to extract the data on Sheet1 in Cols A:D and paste in Sheet sales where the following text appears in Col B on sheet1 in any combination as long as it contains this text



1) Sale Omno
2) Sale Used

I have highlighted the items on sheet1 that is based on the above criteria which needs to be copied to sheet sale

I have tried to write code to do this, but no data is being copied

It would be appreciated if someone could kindly assist me

Please Login or Register  to view this content.

Please Login or Register  to view this content.

---

You have several like:

Please Login or Register  to view this content.

but you only want the yellow record copied, so your test criteria aren't going to work.

Just for the heck of it, using "Instr" what you have in your code.
It loops so it will be slower on larger data ranges.
I assume that the B8 Row ("Sale Retail Demo New") was accidently coloured yellow and should not be copied to other sheet.

Please Login or Register  to view this content.