如何统计各列中同一颜色点的个数

mymotoe6

如题，如何统计各列中同一颜色点的个数，谢谢！

蓝桥玄霜

三种颜色的点的颜色要一致。然后用这个代码。

limonet

首先你的颜色没有统一，这个适合于自定义函数。

limonet

Function CountFC(Rng As Range, CC As Range) As Integer
    Dim C As Range
    For Each C In Rng
        If C.Font.Color = CC.Font.Color Then CountFC = CountFC + 1
    Next C
End Function

mymotoe6

蓝桥玄霜 发表于 2024-3-7 21:04
三种颜色的点的颜色要一致。然后用这个代码。

感谢感谢，又学到了新的知识。

mymotoe6

limonet 发表于 2024-3-7 21:08
首先你的颜色没有统一，这个适合于自定义函数。

感谢感谢，又是一个新的思路，学到了新的知识。

ZXB0312

路过学习一下