excel 2007 如何根据单元格背景颜色作为条件对一行数据求和

1.单击A1单元格，执行“数据——筛选”，开启筛选功能，然后单击A1单元格的下拉箭头，选择“按颜色筛选”——“按单元格颜色筛选”和“按字体颜色筛选”。

　　2.在D1单元格输入公式：=SUBTOTAL(9,A2:A10)即可。

　　说明：SUBTOTAL函数可以实现对可见单元格进行运算，比如此例，就是配合筛选使用。

2007的不知道怎么做到.
2003到有一个.
可以使用以下自定义函数.
代码如下:
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