First of all, being a spreadsheet, Excel normally doesn't have paragraphs. In fact, you didn't show a paragraph, but a sentence.
Second, where is you list of words going to be?
Third, do you want it case-sensitive? or no?
Copy the following code to a standard module.
It is a UDF (user defined function).
It is used like so:
=ExtractDataFromList(A2,$A$17:$A$30)
Where A2 is the location of the text and $A$17:$A$30 is the location of the list.
Here is another version of the code, now that I think about it, this one might work better (I wrote a number of versions for someone some time ago).
Bookmarks