excel2003中如何根据指定单元格颜色来计数

excel2003中如何根据指定单元格颜色来计数？类似countif功能的 比如我需要确认一张表格里 散乱分布的红色单元格的个数 然后把这个数放到指定位置，请给出完整公式或宏 先谢谢了！

添加模块，复制代码
Function countcolour(target As Range)
Dim cell As Range
Dim cnt As Integer
cnt = 0
For Each cell In target
If cell.Interior.ColorIndex = 3 Then cnt = cnt + 1
Next cell
countcolour = cnt
End Function
在单元格中引用countcolour即可。如在F1中输入=countcolour(A1:D5)就是统计A1到D5中红色单元格的个数.注意是单元格颜色,不是字体颜色.

一般地，表格上只能有一行标题好开启筛选。点击菜单栏“数据\”--“筛选\”--“自动筛选\”--点击需要筛选的那一列的标题的单元格的向下的倒三角----点击“自定义\”出现“自定义自动筛选方式\”---在“显示行，规格\”下选择条件