Paint cell based on another cell value with Macro

Hello,

I want to paint one cell, based on value of another cell using Macro.
And i want Macro to do that for entire column.

Example:

COLUMN A COLUMN B

907325974 (PAINT IN BLUE)