问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

excel工作表中不同颜色的数据求和用什么公式

发布网友 发布时间:2022-08-21 10:14

我来回答

1个回答

热心网友 时间:2023-11-21 19:37

如果是表示有颜色的数据进行求和,可以通过“筛选”,将有颜色的数据筛选出来,然后再对这些有颜色的数据进行分析,会更便捷追问应该有一个公式用SUMIF 用到宏函数设置辅助列来判断颜色

追答打开你的工作表:点开发工具-Visual Basic-左边上边的小窗口空白处点右键-插入-模块,然后在打开的编辑框中粘贴以下代码:
Function
CountColor(col As Range, countrange As Range) As
Integer
Dim icell As
Range
Application.Volatile
For Each icell In
countrange
If icell.Interior.ColorIndex = col.Interior.ColorIndex
Then
CountColor = CountColor +
1
End If
Next icell
End Function

Function SumColor(col As Range, sumrange As Range) As
Integer
Dim icell As
Range
Application.Volatile
For Each icell In
sumrange
If icell.Interior.ColorIndex = col.Interior.ColorIndex
Then
SumColor = Application.Sum(icell) +
SumColor
End If
Next icell
End Function

然后关闭,反回到工作表,点击宏安全性-选择启用所有宏,并勾选信任对VBA工程的访问,保存关闭

用法:
按颜色求和:sumcolor(颜色示列格,求和区域或列);按颜色计数:countcolor(颜色示列格,求和区域或列)
例如:要求和从a1到a10这个区域内的红色格,
=sumcolor($a$1,$a$1:$A$10)
计数:countcolor($a$1,$a$1:$A$10)
注意:$a$1
必须是红色格,这是定义颜色的,你也可以设成其它格,但必须是你要求和的颜色

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
临沂比较有名的男装品牌 呼伦贝尔市悦动网络科技有限公司怎么样? 呼伦贝尔中汇实业有限公司怎么样? 呼伦贝尔油玉不绝电子商务有限公司怎么样? 如何避免wps卡顿? 属鼠的男人找对象是属什么,属鼠的人和什么属相合 96年鼠的姻缘在哪年 属相相合年份运势提升 2024属鼠找对象属什么最佳 黑客攻击网站能报案吗 黑客攻击报案有用吗 Excel颜色不同代表单价不同怎么求和 沈阳城市建设学院的专科和本科是在一个校区么??急啊~~ 沈阳建筑大学城市建设学院一本和三本在一个校区吗?? 你好,我是甘肃的考生,问下一沈阳城市建设学院的专科和本科是在一个校区么??? 沈阳城市建设学院的专科和本科是在一个校区么??急啊!! 老师您好,沈阳城市建设学院的专科和本科是在一个校区么??急!! 你好,我是广东的考生,问下一沈阳城市建设学院的专科和本科是在一个校区吗? 大家好,我是广东的考生,问下一沈阳城市建设学院的专科和本科是在一个校区么? 清水尚菜 -forget me not的歌词 求平野绫的 forget me nots... 罗马音歌词 为什么是 forget me not 于和伟监制《猎毒人》,这部剧的口碑如何? 关于默默无闻的诗句 用杜甫的诗句来形容“默默无闻”的诗是什么? 康定到玛尼干戈多少公里 游褒禅山记是什么时候收录到教科书 求王安石的《游褒禅山记》文言文第三段全段.好像近二百字.在下感激不... 马尼干戈的介绍 快递没留存单,有什么办法可以查询此快递吗 诺基亚5230没有声音应该怎么调 注销了,里面的数据公安机关还查得出吗? 注销了实名认证还有吗 羽毛球运动专业术语 如何注销实名认证 羊毛大衣袖口的商标需要撕下去吗? 呢大衣袖口的商标需不需要扯掉 五年级下第五单元词语盘点 河蚬的做法大全 河蚬怎么做好吃 河豚鱼的做法大全 拒绝什么 商议什么 探听什么 没有手机号可以注册吗? 近义词,推却对,探听对,疑惑对,抵御对。 无需手机号怎么注册? 才干 商议 逼近 探听的近义词 注销了还能查到实名认证是谁吗?怎么查,有知道的吗 注销了实名认证还有吗 亚洲龙油电混合显示屏恢复还来按哪个键 亚洲龙2.0豪华版中控显示屏车辆为什么打不开? 亚洲龙中控显示屏使用说明 我的索尼笔记本怎么没有电池保养