I want to find some words in cells

and then change the color of cell if find.

eg. a cell contain "hello I am moto"
if macro find "am" then change the cell color

anybody know how to write the macro ?
Thanks