網(wǎng)友解答: Excel里面根據(jù)數(shù)據(jù)的顏色進(jìn)行匯總，可以利用篩選、subtotal函數(shù)實(shí)現(xiàn)。如下圖，要對(duì)字體顏色為紅色、綠色、黑色的分?jǐn)?shù)進(jìn)行匯總。步驟：1.對(duì)數(shù)據(jù)按照顏色篩選，篩選綠色；

Excel里面根據(jù)數(shù)據(jù)的顏色進(jìn)行匯總，可以利用篩選、subtotal函數(shù)實(shí)現(xiàn)。

如下圖，要對(duì)字體顏色為紅色、綠色、黑色的分?jǐn)?shù)進(jìn)行匯總。

步驟：1.對(duì)數(shù)據(jù)按照顏色篩選，篩選綠色；

2.輸入函數(shù)，顏色為綠色的語文成績匯總=SUBTOTAL(9,B4:B8)

subtotal函數(shù)的參數(shù)9表示對(duì)篩選出來的內(nèi)容進(jìn)行求和，如果直接使用sum函數(shù)求和會(huì)把隱藏起來的也計(jì)算在內(nèi)。

好了，以上操作就把綠色的數(shù)據(jù)匯總求和了，如果想要求其他顏色的也是一樣。

更多關(guān)于Excel的使用方法與技巧，請(qǐng)點(diǎn)擊我的頭像進(jìn)行關(guān)注，里面有很多Excel學(xué)習(xí)內(nèi)容。

——BY：酷米號(hào)@走進(jìn)Excel

自定義一個(gè)函數(shù) color(a,b,c,d)

1、 C為true求和，否則計(jì)數(shù)；

2 、d為true按背景計(jì)算，否則字體計(jì)算；

Function Color(參照顏色區(qū) As Range, 統(tǒng)計(jì)區(qū) As Range, Optional SumOrCount As Boolean = False, Optional BackOrFont As Boolean = False)

Application.Volatile

Dim cell As Range, Colors, SUM, i

' 第三個(gè)參數(shù)是true 則求和，否則是計(jì)數(shù)

'第四參數(shù)是True則按背景色計(jì)算，否則按字體色計(jì)算

Colors = IIf(BackOrFont, 參照顏色區(qū)(1).Interior.Color, 參照顏色區(qū)(1).Font.Color)

For Each cell In 統(tǒng)計(jì)區(qū) '遍歷求和區(qū)

If BackOrFont Then

'背景色相同則累加數(shù)值及計(jì)數(shù)器

If cell.Interior.Color = Colors Then SUM = SUM + IIf(IsNumeric(cell), cell, 0): i = i + 1

Else

'字體色相同則累加數(shù)值及計(jì)數(shù)器

If cell.Font.Color = Colors Then SUM = SUM + IIf(IsNumeric(cell), cell, 0): i = i + 1

End If

學(xué)好貴在看書與實(shí)踐