计算颜色填充 Excel 2013 的单元格数答案

【问题标题】：Count number of cells with color fill Excel 2013计算颜色填充 Excel 2013 的单元格数
【发布时间】：2016-08-25 07:20:22
【问题描述】：

有没有一种方法/函数可以在不使用 VBA 的情况下计算 Excel 2013 中填充颜色的单元格的数量？像

COUNTxxx(A1:A20)

【问题讨论】：

据我所知，以及我最近搜索的内容：没有。但是您可以使用 vba 创建一个自定义函数，就像使用普通的 excel 公式一样。
同意安德烈亚斯。我认为最好的（据我所知也是唯一的）方法是在 VBA 中编写自定义函数。另一种方法是添加一个辅助列，如果满足相同的条件来输入颜色，则在其中输入 1，在所有其他情况下输入 0。

标签： excel function excel-formula excel-2013

【解决方案1】：

很确定你必须使用VBA

【讨论】：

【解决方案2】：

很遗憾，仅使用 Excel 内置函数无法完成此任务。

有两种方式：

使用 VBA 创建一个或多个用户定义函数，对彩色单元格进行计数/求和，然后从工作簿中调用它们。您也可以将这些UDF 放入personal.xlsb 文件中，这样您就不需要每次都将它们复制到新工作簿中。但是，无法使用 UDF 正确处理以条件格式着色的单元格。
使用一个特殊的插件，它会根据颜色对必要的单元格进行计数/求和。

您可以找到有关计数/求和彩色单元格的方法的更多详细信息，包括 VBA 代码，在这篇博文中： How to count and sum cells by color in Excel

【讨论】：

【解决方案3】：

Function CountColor(xRange As Range, xColor As Long) As Long
Dim xCell As Range
For Each xCell In xRange
    If xCell.Font.ColorIndex = xColor Then
        CountColor = CountColor + 1
    End If
Next
End Function

在excel中使用这个函数

=CountColor(A1:E25;3)

3 = 红色

【讨论】：