VBA: Remove line in cell if substring present

[jadgon]

I am looking for a VBA code to remove line in cell if given substring "tiger" present.
Also if I give special character or combination of numbers it should do the same.
An example is below:



Input Example (Column A1)
Output Example (Column B1)


Eat healthy
What ! you saw a tiger


2What is that ? A tiger


()I live in England




Eat an apple everyday. What

Eat healthy
()I live in England
Eat an apple everyday. What







Eat healthy
What ! you saw a tiger


2What is that ? A tiger
Eat healthy
What ! you saw a tiger


2What is that ? A tiger


()I live in England




Eat an apple everyday. What
()I live in England

Eat healthy
Eat healthy
()I live in England
Eat an apple everyday. What
()I live in England
Eat an apple everyday. What

[arnelgp]

one of those sample.