Remove words by substring list

Originally Posted by Glenn Kennedy

It can be done by formula but is made difficult 1) by so many stubs and 2) different capitalisation within stubs. VBA is probably better.

=IFERROR(TEXTJOIN(" ",,FILTERXML("<A><B>"&SUBSTITUTE(A2," ","</B><B>")&"</B></A>","//B[not(contains(., 'auti') or contains(., 'AUTI') or contains(., 'tion') or contains(., 'mpl') or contains(., 'Mpl'))]")),"")

Its working very cool, but how many stubs will accept this function?

For VBA solution... I must to make new post in VBA section?