如何按照单元格颜色求和?

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

其实小编想说,没有办法?但是……我那无处安放的魅力就真的没地方放了

,手动滑稽……

虽然说,微软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代码来完善。其实按照单元格颜色求和还有一个宏表函数也可以处理,今天我们就不去介绍了,大家掌握此方法即可。

(0)

相关推荐