Reading and modification of Excel font color

 COLORREF color= RGB(xxx, xxx, xxx);

 //填充颜色
 Interior interior;
 interior.AttachDispatch(range.GetInterior());
 color = (long)interior.GetColor().dblVal;//获取颜色
 interior.SetColor(_variant_t(color)); //设置颜色

//字体颜色
 Font font;
 font.AttachDispatch(range.GetFont());
 color = (long)font.GetColor().dblVal; //获取颜色
 font.SetColor(_variant_t(color));//设置颜色

 BYTE RVal = GetRValue(color);
 BYTE GVal = GetGValue(color);
 BYTE GVal = GetBValue(color); 

 

Attach the link: http://bbs.csdn.net/topics/330223679