How to write macro for find and match particular string in a column

Hi,

I have industry names,I need to match against keywords and put it in the next column corresponding to the industry.
If any common word matches between Industry and keyword I should write that keyword.

For Example,
Industry Column has -Agricultural chemical manufacturing
It should write either chemicals or Agriculture/Hunting and forestry from keyword

If do not find any match we can leave blank as well.

I have attached the sheet.