0

如何根据 MS Excel 2010 中的背景颜色对单元格求和。我试过了

=colorfunction(B2,F12:F192,TRUE)

但它不工作

4

1 回答 1

0

试试我快速写的东西。是的,可以改进它以涵盖和处理所有可能的情况。但把它留给你作为家庭作业。

  Function clrsum(var As Range)
  FirstRow = var.Cells(1, 1).Row
  LastRow = var(var.Count).Row
  col = var.Cells(1, 1).Column

  For i = FirstRow To LastRow
      If Cells(i, col).Interior.ColorIndex = <put some color index here> Then
          clrsum = clrsum + Cells(i, col)
      End If
  Next
  End Function

然后使用像 =clrsum(A1:A10) 这样的公式

于 2013-10-10T08:55:29.473 回答