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);
本文介绍了如何使用VBA在Excel中设置单元格的颜色及字体颜色。通过具体代码示例展示了如何利用RGB值来定义颜色,并通过AttachDispatch方法连接到单元格范围或字体属性,实现获取和设置颜色的操作。

1346

被折叠的 条评论
为什么被折叠?



