在Excel中怎样统计同一种颜色单元格数

Question

本 宏 解 所 需要详细 答 比 行 3种颜色 要 本行 显示各种颜色 单元格数

Answer 1

要统计同一种颜色单元格的个数有两种方法
使用自定义函数，这个需要在VBA编辑窗口中新建模块编写代码。以下是代码
Function
colors(选区
As
Range,
颜色
As
Range)
a
=
颜色.Interior.ColorIndex
For
Each
b
In
选区

If
b.Interior.ColorIndex
=
a
Then

k
=
k
+
1

End
If

Next

colors
=
k
End
Function
然后输入函数=colors(选区,颜色)
第一参数“选区”指要统计单元格颜色的范围，第二参数“颜色”指统计的颜色单元格引用地址。
2.使用宏表函数，=get.cell(63,单元格)，需要注意的是宏表函数必须定义名称才可以发挥作用，比如定义为“颜色”这个名称，然后在工作表中输入公式=颜色，拖动复制公式，最后使用countif函数计算出颜色的个数，比如对红色进行统计，使用定义名称颜色写的公式，得到红色底纹的数值为3，那么公式=countif(范围，3），最后得出统计结果。
以上两种统计方式，相比较使用自定义函数还是比较方便，只要将其复制到模块中便可在本工作簿中使用。