根据其他单元格的颜色填充单元格的详细信息

Question

我有一个由团队执行任务的 Excel，用户将每个任务的详细信息放在每一行中，其中包括日期（任务开始日期）和其他详细信息。 完成的任务，特定行将以绿色突出显示，未完成的任务将显示为黄色，取消的任务将显示为红色。我必须制作汇总表，该表将分解已完成的任务数量，取消或未完成。我正在寻找基于行颜色提取详细信息的选项？有什么选择吗？

Answer 1

您可以使用 VBA 创建 UDF（用户定义函数）并将其保存到加载项文件中，以便在每个工作簿和其他计算机上使用它。

Microsoft 有一篇知识文章解释了如何执行此操作，可以在 HERE 找到。 (https://support.microsoft.com/en-gb/kb/2815384)

基本上要使用的代码是：

Function CountCcolor(range_data As range, criteria As range) As Long
    Dim datax As range
    Dim xcolor As Long
xcolor = criteria.Interior.ColorIndex
For Each datax In range_data
    If datax.Interior.ColorIndex = xcolor Then
        CountCcolor = CountCcolor + 1
    End If
Next datax
End Function

现在在您要计算颜色以编写函数的单元格中：=CountCcolor(range_data,criteria)

“range_data”是指您要计算颜色数量的范围，“标准”应该是与您要计算的颜色相同的单元格的单元格引用。