【原】如何按照单元格颜色求和？

今天有网友问小编，如何按照单元格颜色进行求和？

其实小编想说，没有办法？但是……我那无处安放的魅力就真的没地方放了，手动滑稽……

虽然说，微软Excel中缺失没有自带的函数可以按单元格颜色进行求和,但是我们可以自己来写一个

先来看一下效果图

具体怎么做的呢？

下面是需要复制的代码：

---

'功能-按照单元格颜色求和

'ColorRng-要对求和的颜色单元格

'SumRng-对应的求和区域

'作者：Excel办公实战-小易

'********************************************************

Function SumByInColor(ColorRng As Range, SumRng As Range)

    Application.Volatile

    Dim rng  As Range, tempSum As Long

    For Each rng In SumRng

        If rng.Interior.Color = ColorRng.Interior.Color Then

            tempSum = tempSum + rng.Value

        End If

    Next

    SumByInColor = tempSum

End Function

粘贴后效果图：

碎碎念：

虽然Excel已经很强大，但是我们一些特殊的需求还好无法满足的，好在Excel支出二次开发，来增强他的功能，我们可以自己编写VBA代码来完善。其实按照单元格颜色求和还有一个宏表函数也可以处理，今天我们就不去介绍了，大家掌握此方法即可。