Layer Color setting from VBA

How to set Layer color using VBA ??