[原创]按颜色进行条件求和（自定义函数）

qiye1818

自定义我会了，可是打开别的EXCEL表格，要想用此方法，就还得得定义想要用的EXCEL，就没有插件类的东西，放进去以后一直可以用？

PERSOPHONE

我用的是excel 2007,选择数据-全部刷新，即可

lynn_xiaoyu

非常感谢，用上啦

garyfs

谢谢楼主和几位大哥的见解分享,获益良多,感谢!

cbtaja

原帖由 e1e598 于 2009-8-22 16:44 发表
这个东东 对条件格式产生的颜色有用吗?

对条件格式产生的颜色没有用。
如果要把条件格式产生的同外观的单元格也考虑进来，代码要复杂得多，那要用到一个叫做“FormatConditions 集合对象”的属性、方法。下面是帮助文档的部分有关内容：

FormatConditions 集合对象
请参阅 属性 方法 事件 特性
Range
FormatConditions (FormatCondition)
Borders (Border)
Font
Interior

代表单个区域的所有条件格式的集合。FormatConditions 集合最多可包含三个条件格式。每一条件格式由一个 FormatCondition 对象表示。

FormatConditions 集合对象的用法
可用 FormatConditions 属性返回一个 FormatConditions 对象。可用 Add 方法新建一个条件格式，可用 Modify 方法对现有条件格式进行更改。

下例为 E1:E10 单元格添加条件格式。

With Worksheets(1).Range("e1:e10").FormatConditions _
        .Add(xlCellValue, xlGreater, "=$a$1")
    With .Borders
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = 6
    End With
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With
说明
如果试图为单个区域创建三个以上的条件格式，则 Add 方法失效。如果一个区域有三个格式，则使用 Modify 方法可对其中某个格式进行更改。也可以先使用 Delete 方法删除一个格式，然后使用 Add 方法新建一个格式。

有关条件格式的详细信息，请参阅 FormatCondition 对象。

[ 本帖最后由 cbtaja 于 2010-5-17 12:10 编辑 ]

dawin

EXCEl visual basic 参考，不错。。谢谢。

wdb007

谢谢!又学得一招!

chongguanyin

怎样安装呢？

ChenRui222

感谢，感谢，收藏下来慢慢研究！

yzlxj8848

第一次来，抱着学习的态度