Marco; extract to Word and highlight constant search terms?

I am wondering if this is possible.

First I have an Excel Workbook with 3 sheets. Sheet1 that is loaded with data. Each ROW is an independent set and the columns list different pieces of date for each set. Example…

Jeff | [email protected] | phone number | abstract | more data

I run a macro that looks at Sheet3 for keywords. The macro then searches column P in Sheet1 for those keywords. When the macro finds a keyword in column P, the macro copies the whole row and pastes the row in Sheet2. End Macro.

The data in each cell of column P is an enormous (~ 1000 words) abstract. Instead of reading the whole abstract, I can glean the required info by reading a few words around/near a constant set of 3 words. Example…

Constant set of words: red, fox

Yesterday I saw a fox jump over the fence. The fox was a very odd shade of red.

Is it possible to create a macro that, when asked (a button?) will copy the abstract, paste it in MSword, run a search (in MSword) and highlight each of the words (red, fox)? I can then quickly see the words (red, fox) in MSword, read the words nearby and get the required info without reading the whole abstract.

Ideally the macro would run on one cell at a time on demand.

Thoughts? Any help would be greatly appreciated.

Chopped out of another app - and it uses IE rather than Word (Simpler to manipulate the text).

Sheet has random text in Col P. The count of the number of characters is shown in Col A. The last row has 3000+ chars just to show workings with a lot of text.

Click the button to display userform. This shows the number of matches (up to 5, easily changed) in Col P for a list of defined words (or phrases).

If the Count is > 0 then a 'Review' button is enabled.

The Review button displays the text in Internet Explorer with each word or phrase highlighted. Note this uses the HTML5 'mark' tag - if running on an older version of IE then this may not work, but it is easily changed.

Meant as an example only, not a finished app.