ALT+F11 插入模块
Function SUMColor(rag1 As Range, rag2 As Range)
Application.Volatile
For Each i In rag2
If i.Interior.ColorIndex = rag1.Interior.ColorIndex Then
SUMColor = SUMColor + CEL.VALUE
End If
Next
End Function
相同颜色单元格数据求和
在需要求和的单元格里输入 =SUMCOL(A1:A6,A1)
表示求A1:A6,单元格填充颜色数据之和,后面的A1,表示填充颜色单元格,根据实际情况修改即可
http://zhidao.baidu.com/question/352541434.html追问这个回答大概方向符合我 但是还有点差距
比如我的A列 有红黄蓝颜色的格子,我只求其中红色格子的数据的和。
你这个是所有颜色的数据都求和。
追答红颜色求和 =SUMCOL(A:A,A1)
表示求A列,单元格填充红颜色颜色数据之和,后面的A1,表示填充红颜色单元格,