求助VBA代码

15262652286

料號	2018/08/01     (WK01)	2018/08/13     (WK02)	2018/08/20       (WK03)	2018/08/27     (WK04)	2018/09/03     (WK05)	2018/09/10     (WK06)	2018/09/17     (WK07)	2018/09/24     (WK08)	2018/10/01     (WK09)	2018/10/08     (WK10)	2018/10/15     (WK11)	2018/10/22     (WK12)
1
1
1
1	-2	-3
2
2
2
2	-5	-9		-7	-6	-63
3
3
3
3									-89		-65
要求：	當B列到E列中第4行有負數，A列相同料號顯示紅色
	當F列到I列中第4行有負數，A列相同料號顯示黃色
	當J列到M列中第4行有負數，A列相同料號顯示藍色
	當A列已經顯示為紅色的之後，就不在顯示其他顏色了