<em>Excel</em> <em>vb</em>识别条件格式填充的颜

你的程序代码百太让人莫名其妙了，空间坐标系定义的很乱度，怎么还和P1的长宽联系起来了，画知了半天后面突然又转换ScaleMode 属性的度量单位，建议你道好好改改，坐标系一版开始就确定好，从始至终不要改度量权单位，要么缇，要么像素。

是vba还是vb，vba中用interior.color可以识别所有颜色。colorindex就只有56种颜色

这个就用知公式Vlookup就可以实现吧？

=IF(B1<>"",IF(ISERROR(VLOOKUP(B1,代码!道$A:$B,2,0)),"无此代码，请添专加",VLOOKUP(B1,代码!$A:$B,2,0)),"")

具体可属以看附件

步骤如下：

1.将正、负、0分别填充不同颜色：

2.Alt+F11，输入如下代码：

3.F5执行代码，结果如下：

本文标签：vb excel 颜色代码(1)vb颜色代码大全(1)