Rijen behouden en verwijderen met conditie

[helpmijnluser]

Ik wil een macro maken die na openen van een csv-file:
- eerst een invoerveld geeft
- elke rij die één van 2 bepaalde tekststrings bevat EN de tekst die ik invoerde in het invoerveld, behoudt
- elke rij die één van die 2 tekststrings bevat maar niet de ingevoerde tekst, verwijdert
- elke rij die niet die 2 tekststrings bevat, behoudt

bvb.:
"aaa","bbb","ccc","Tekststring1","ddd","eee","Invoertekst","fff": behouden
"aaa","bbb","ccc","Tekststring2","ddd","eee","Invoertekst","fff": behouden
"aaa","bbb","ccc","Tekststring1","ddd","eee","fff": verwijderen
"aaa","bbb","ccc","Tekststring2","ddd","eee","fff": verwijderen
"aaa","bbb","ccc","ddd","eee","fff": behouden

-------------------------------------------------------------------------------------------------------------------

Ik ken geen VBA, maar in elementaire gezien zou het ongeveer hier op neerkomen:

Input "Input"
For a = 1 to lastrow
If row a contains Tekst1 and contains Input then keep row,
If row a contains Tekst2 and contains Input then keep row,
If row a contains Tekst1 and not contains Input then delete row,
If row a contains Tekst2 and not contains Input then delete row,
If row a not contains Tekst1 then keep row,
If row a not contains Tekst2 then keep row,
next a