发布网友 发布时间:2022-04-23 14:14
共1个回答
热心网友 时间:2023-10-17 21:42
使用VBA自定义“SUMColor”函数,按下alt+F11,插入 模块写下过程Function SUMColor(rag1 As Range, rag2 As Range)Application.VolatileFor Each i In rag2If i.Interior.ColorIndex = rag1.Interior.ColorIndex ThenSUMColor = SUMColor + 1End IfNextEnd Function然后在你需要统计的工作表里面找个空白的单元格(例如D2)填充你要统计个数的颜色,然后在右边单元格写下:=SUMColor(D2,$A$1:$C$22)。(“$A$1:$C$22”为有统计颜色填充的区域),根据你的需求自己改。