excel有没有函数可以识别单元格底色?
我有两个表格,一个是原始表,一个是更新了内容的表,更新的表中更新部分或需要注意的部分标记了不同颜色,我想统计不同颜色的格子数,由于变量较多行数也很多,不能用筛选,请问谁有...
我有两个表格,一个是原始表,一个是更新了内容的表,更新的表中更新部分或需要注意的部分标记了不同颜色,我想统计不同颜色的格子数,由于变量较多行数也很多,不能用筛选,请问谁有办法?最好有函数能识别单元格底色,那么一个IF语句就可以搞定了。
展开
展开全部
ALT+F11,打开VBA窗口,左侧鼠标右击“Thisworkbook”,新建模块module,然后右边窗口粘入以下代码:
Function Countcolour(rng As Range, colour As Range) As Long
Dim c as Range
Application.Volatile
For Each c In rng
If c.Interior.ColorIndex = colour.Interior.ColorIndex Then
Countcolour = Countcolour + 1
End If
Next
End Function
关闭VBA代码窗口,回到工作表。
使用函数:=Countcolour(数据区域,要数的目标颜色单元格地址)
Function Countcolour(rng As Range, colour As Range) As Long
Dim c as Range
Application.Volatile
For Each c In rng
If c.Interior.ColorIndex = colour.Interior.ColorIndex Then
Countcolour = Countcolour + 1
End If
Next
End Function
关闭VBA代码窗口,回到工作表。
使用函数:=Countcolour(数据区域,要数的目标颜色单元格地址)
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询