作者:乔山办公网日期:
返回目录:excel表格制作
这个容易,一会把代码写好发附件
没问题,我帮你做做,但需要半个小时左右,但最近比较忙,你什么时候要?
这个只能用VBA代码解决,可百以用VBA建一个自定义函数求几种颜色的单元格个数,方法如下:
在VBA新建一个模块,度在模块里粘贴以下代码:
Function RGBN(Ram As Range, N%)
Dim Ra As Range, Va
Va = Choose(N, RGB(255, 0, 0), RGB(0, 255, 0), RGB(0, 0, 255))
For Each Ra In Intersect(Ram, Ram.Parent.UsedRange)
If Ra.Interior.Color = Va Then RGBN = RGBN + 1
Next
End Function
然后在A101单元格输入公式:=RGBN(R:R,1)即可得到R列红色单元格个数。第二参数1表示红包,2表示绿专色,3表示蓝色。不过注意的是颜色有很多很多种,稍有一点颜色变化都不能正确计算属的
没有难度,但象优秀率、合格率、优良率、优良人数等需要有评定标准才能给出公式。
其他的列出项目标题就行。