=SUMColor(D2,$A$1:$A$7) ,这个还是不行!!
追答你再试下
追问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 + 1
End If
Next
End Function
这是什么意思呢 ?
我无语了。。。。