excel怎么计算一列有背景单元格的个数

Posted 2023-03-03

给个公式吧，或者需要代码发下详细代码。急着用

写了一个VBA
Function ColrNum(rng1 As Range) As Long
Dim TempRng As Range
Application.Volatile
For Each TempRng In rng1
If TempRng.Address = TempRng.MergeArea(1).Address Then
If TempRng.Interior.ColorIndex > 0 Then ColrNum = ColrNum + 1
End If
Next
End Function

如果要统计A列有填充色的个数只要输入 =ColrNum(A1:A100)，（假定数据在A1到A10）追问

要不要打上面那段代码呢？

追答

要贴上去的。先打开VBA，再插入模块，再把这段代码贴到模块右边的代码框去。

接下来就可以在excel任意一个单元格输入统计公式

追问

不行啊，显示#NAME错误

追答

我刚测试过的，没有问题。再强调一遍步骤：
1.ALT+F9打开VBA
2.插入--模块
3.模块右边区域贴上上述代码
4.回到excel界面，在某一单元格中（你需要显示结果的单元格）输入：=ColrNum(A1:A100)，（具体是A列还是B列，是从第一行开始还是到100行为止，根据你自己实际数据来定）

参考技术A 这个需要用宏表函数提取出背景的颜色值,然后再求和.
2007里可以按颜色筛选出来,然后再计数.

http://club.excelhome.net/viewthread.php?tid=81978&highlight=%D1%D5%C9%AB%2B%B8%F6%CA%FD

这两个链接注册一下,可以看到附件.

http://club.excelhome.net/viewthread.php?tid=490732&highlight=%D1%D5%C9%AB%2B%B8%F6%CA%FD 参考技术B 能给个图片不？追问

计算每列有背景颜色的单元格个数