Excel 如何按指定的单元格颜色进行计数或求和
发布时间:2022-06-16 17:21:42
如果Excel工作表的某区域中包含不同的底纹颜色,我们可以用一个自定义函数对该区域按指定的单元格颜色进行计数或求和。方法是:
1.按Alt+F11,打开VBA编辑器。
2.单击菜单“插入→模块”,将插入名称为“模块1”的模块,在右侧的代码窗口中输入下列代码:
Function SumByColor(Ref_color As Range, Sum_range As Range)
Application.Volatile
Dim iCol As Integer
Dim rCell As Range
iCol = Ref_color.Interior.ColorIndex
For Each rCell In Sum_range
If iCol = rCell.Interior.ColorIndex Then
SumByColor = SumByColor + rCell.Value
End If
Next rCell
End Function
Function CountByColor(Ref_color As Range, CountRange As Range)
Application.Volatile
Dim iCol As Integer
Dim rCell As Range
iCol = Ref_color.Interior.ColorIndex
For Each rCell In CountRange
If iCol = rCell.Interior.ColorIndex Then
CountByColor = CountByColor + 1
End If
Next rCell
End Function
上述两个自定义函数,一个是SumByColor,可以对区域按指定单元格的颜色求和。另一个是CountByColor,可以统计区域中某种颜色的个数。这两个自定义函数都有两个参数,前一个参数指定包含某种颜色的单元格,后一个参数为求和或计数区域。
3.关闭VBA编辑器。
使用方法:假如要求和或计数的区域在A1:B10区域中。
求出该区域中单元格底纹颜色为红色的所有单元格数值之和,在单元格中输入公式:
=sumByColor(A1,A1:B10)
求出该区域中单元格底纹颜色为红色的所有单元格的个数,在单元格中输入公式:
=CountByColor(A1,A1:B10)
Excel 如何按指定的单元格颜色进行计数或求和的下载地址:


猜你喜欢
- 如何在Word 2016中为文本着色?在Word 2016文本中添加颜色不会使您的文字更加丰富多彩。它所要做的就是让您希望在打印文档时拥有更
- excel2016斜线表头怎么做?excel2016兼容性很强,所以依旧有很多用户在使用这个版本,那么如果使用excel2016进行斜线表头
- 相信小伙伴们都知道,在Excel表格中,我们可以插入各种专业的数学格式,如圆的面积,二项式定理,勾股定理,二次公式,和的展开式等等,我们还可
- 当我们使用word文档写了一篇美文时,如果不做任何修改排版会让文章显得过于单调,但是当我们对标题进行美化后,会让整篇文章添彩不少。下面小编马
- 在Excel的操作中,我们可能会遇到需要取出某个单元格中数据的前几位数,这个需要怎么操作呢?除了直接输入之外,在已经存在的单元格内,通过输入
- Photoshop是一款我们常用的图片处理软件,在Mac版的Photoshop中如何把图片嵌入圆形里呢?下面我们分享在Mac版Photosh
- 你现在的微信名是什么?2020了,你有想过给自己换一个新的独一无二的微信名吗?我们在用微信社交的时候,添加好友的第一眼,看到的就是微信昵称,
- [PConline 技巧]如果你的电脑重启后,发现Word无缘无故启动了,不用着急。大概率是因为你用的Win10里有一项设置被默认打开了,没
- Canary通道的Microsoft Edge 76最新版本中,终于为Windows 10平台引入了Dark主题以及拼写检查功能。最新的Ed
- Win7旗舰版系统用户在平时工作学习看视频的时候,经常会需要用到截图的功能保存下来重要的画面信息,Win7旗舰版系统用户反映自己在截屏的时候
- Word2007文档中的剪贴画发光效果究其实质就是在剪贴画周围添加彩色边框,跟“柔化边缘”功能配合使用,使剪贴画看上去似乎在背后有彩色光照。
- acer宏碁笔记本电脑怎么u盘重装win7系统?宏基与华硕、惠普、联想、戴尔同属于笔记本电脑的一线品牌。那么宏基笔记本电脑怎么使用u盘重装系
- 这篇文章主要介绍了win10怎么设置休眠不断网?win10电脑休眠自动断网的解决方法的相关资料,需要的朋友可以参考下本文详细内容介绍win1
- Win10系统电脑怎么安装打印机?许多用户在使用电脑的时候通常都会需要打印一些文件,那么我们在使用电脑的时候应该怎么安装打印机呢?下面小编就
- AltStore是什么?AltStore是一款由Riley Testut 所推出的IPA签名工具,就像是Cydia Impactor 工具,
- MAC电脑的硬盘损坏,导致其中储存的资料读取不了,对于这个问题,下面有个可行的解决方法,感兴趣的朋友可以看看我们有时会发现MAC电脑的硬盘损
- 一些Win7系统的用户反馈说不知道如何借助format低格命令进行U盘格式化?今天小编将为大家带来的是Win7系统借助format低格命令进
- 当我们使用win10操作系统计算机时,有些情况下计算机可能会卡死。有些朋友想改善这个问题,就在电脑上安装了固态硬盘,但发现并没有想象的那么理
- 作为一款免费的办公软件,WPS受到了非常多的用户喜爱,但是也有不少人表示在使用过程中经常会弹出广告推送,很影响使用体验。那么如何关闭WPS的
- 如果你的 iPhone 提示“检测到原深感摄像头出现问题。面容 ID 已停用。”出现提示后你可以继续使用 iPhone 或 iPad,但是面