Check one Cell for multiple words in one macro line?

Hi guys,

Probably a simple question for some of you, but I have these lines in my macro:

If Cells(x, 6) Like "*text1*" Then...
If Cells(x, 6) Like "*text2*" Then...
If Cells(x, 6) Like "*text3*" Then... etc etc.

So for each search criterium I need to add a new 'If..Then..' line. I need like 30 of these lines which makes my program very slow.
Each cell is being checked if it recognizes one of the 30 words I put in the macro.

I wish I could make something like:
If Cells(x, 6) Like "*text1*" OR "*text2*" OR "*text3*"... OR ..."*text30*" Then....

Is there a construction posible like this?
So I can put all the words that the cell needs to be checked for are in one singe line? Instead of making a lot of If..Then..'s for each single word?


Thank you,
Vernon