Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 25133|回复: 22

[已解决]EXCEL2007 自动统计颜色单元格问题。

  [复制链接]
发表于 2012-5-30 18:33 | 显示全部楼层 |阅读模式
本帖最后由 点数不足 于 2012-5-30 18:39 编辑

刚刚接触EXCEL,最近在做一个表格。
现在希望是在填充颜色(比如浅绿)的时候,下面统计的地方可以自动更新统计出来的浅绿色单元格数量。


在网上和我们论坛上看到了很多,因为是新新手,很多方法的实际操作都遇到了问题。现如今一头雾水。使用=gte.cell还是用VBA都没搞懂,连最后用=SUMCOLOR还是=CountColor都没有概念。
实际上也是一个刚刚制作的表格而已,附件也很不方便上传……希望大虾指明方向。辛苦了
最佳答案
2012-5-30 18:57
以下是用VBA代码实现的按背景颜色计数与求和。附件是我收藏的其他高手做的。与大家分享。
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2012-5-30 18:37 | 显示全部楼层
目前为止,还没有能够统计特定颜色的单元格数量。只能通过VBA来实现
回复

使用道具 举报

 楼主| 发表于 2012-5-30 18:52 | 显示全部楼层
lucking551 发表于 2012-5-30 18:45
还有一种,可以通过查找,来实现带颜色单元格数的统计。

多谢你,这个方法已经学会了。
不过我这个表格的颜色是要每周更新填充的,而且统计方式比较复杂,比如有的是D4:D34,AE4,AE34。有的是F4:F34,AG4,AG34这样的。
回复

使用道具 举报

发表于 2012-5-30 18:53 | 显示全部楼层
统计相同颜色单元格数量
ALT+F11  插入模块
Function SUMColor(rag1 As Range, rag2 As Range)
Application.Volatile
For Each i In rag2
If i.Interior.ColorIndex = rag1.Interior.ColorIndex Then
SUMColor = SUMColor + 1
End If
Next
End Function

在空白(比如D2)单元格填充要统计的颜色  再在空白单元格输入  =SUMColor(D2,$A$1:$A$7)  根据实际情况修改要统计颜色区域

每次颜色更变后,可以按F9更新数据就OK了。

如附件

单元格颜色统计.xls

20.5 KB, 下载次数: 337

回复

使用道具 举报

发表于 2012-5-30 18:57 | 显示全部楼层    本楼为最佳答案   
以下是用VBA代码实现的按背景颜色计数与求和。附件是我收藏的其他高手做的。与大家分享。

按颜色求和与计数函数.xls

25.5 KB, 下载次数: 702

回复

使用道具 举报

发表于 2012-5-30 19:01 | 显示全部楼层
利用宏表函数Get.cell和辅助列可以完成统计。
回复

使用道具 举报

 楼主| 发表于 2012-5-30 19:07 | 显示全部楼层
多谢大家,回家以后试试看
回复

使用道具 举报

发表于 2012-5-30 19:40 | 显示全部楼层
发个样表来看看,说不定能解决。
回复

使用道具 举报

 楼主| 发表于 2012-5-31 00:30 | 显示全部楼层
本帖最后由 点数不足 于 2012-5-31 09:55 编辑
ligh1298 发表于 2012-5-30 18:57
以下是用VBA代码实现的按背景颜色计数与求和。附件是我收藏的其他高手做的。与大家分享。

非常感謝您的方法!完全解決了!------------------------------------------------------
发现统计上是完全没有问题,按F9也是可以更新的。
但是针对我自己制作的表格还是有问题,等下我发上来,麻烦可以查看一下那里不对。
回复

使用道具 举报

发表于 2012-5-31 07:43 | 显示全部楼层
学习VBA代码
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-12 01:26 , Processed in 0.297733 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表