Search Cells for key words and add category code

Hi,

I have a situation where I would like to have a macro that looks at a list of descriptions in Column A, determines if any key words from a master list are in the cell, and then put the corresponding category code in the B column right next to it.

In my example, I have the descriptions in Column A, the "yet-to-be-filled" category column B, and then a key showing which key words to look for. The macro would need to search Column A for the predetermined key words, and then put the corresponding category code in the same row, Column B.

Thanks in advance for any help! I was banging my head against the wall (not literally!) trying to figure this out!

-Jim