发布网友 发布时间:2022-04-21 00:50
共3个回答
热心网友 时间:2023-10-30 06:44
用function 定义一个VBA 函数,这样简单方便实用。代码如下。
Function Color_Count(Rng As Range, rn As Range)
'rng 是需要统计的区间
'rn 是提取颜色的单元格
Application.Volatile
Dim rng1 As Range
mycolor = rn.Interior.ColorIndex
For Each rng1 In Rng
If rng1.Interior.ColorIndex = mycolor Then
mycount = mycount + 1
End If
Next
Color_Count = mycount
End Function
这里就要把汉字也要编进去吗,编程我这一块实在太弱了,公式之块还过得去
热心网友 时间:2023-10-30 06:45
这么花哨的表格也许自己感觉特别好,但在提问看到这样的截图,坦率地说,除也感到伤眼外,没有其他任何好处。
要实现你的目的,有这样几个思路:
首先要考虑你的显示红色的单元格中的红色是如何得到的?如果是条件格式,那么条件格式的条件是什么?这个条件也就是统计红色个数的条件。
如果是手工加上去的,那么可以有两个方法可以考虑:一个是宏表函数
=GET.CELL(63,单元格地址)
定义名称,在辅助数据区域中用定义的名称得到对应单元格的填充颜色值。然后用
=COUNTIF(辅助列,颜色值)
来统计填充颜色的个数
第二个方法是用VBA来统计。
热心网友 时间:2023-10-30 06:45
玩彩票最终都去玩EXCEL了!
其实你换个思路,你这个红色怎么得来的,那就按条件来统计这个满足条件。