基于相邻细胞背景颜色的Sumif公式

时间:2017-02-08 19:24:03

标签: excel excel-vba background-color sumifs vba

我想知道是否存在一个Sumif公式,它将根据列A中它旁边的单元格是否突出显示来对B列中的所有值求和。

一个例子是A3和A8中的单元格突出显示为黄色,因此我希望B3和B8中的单元格总和在F4中。我必须创建一个公式或宏来实现这个目标吗?

1 个答案:

答案 0 :(得分:2)

您可以使用VBA函数对所有着色的单元格求和: enter image description here

代码:

Public Function ColorSum(myRange As Range) As Variant

Dim rngCell As Range
Dim total As Variant

For Each rngCell In myRange.Cells

    If rngCell.Interior.ColorIndex <> -4142 Then
    total = total + rngCell.Offset(0, 1).Value
    End If

Next rngCell

ColorSum = total

End Function