來這問問題的怕都是難以學好的了。因為百度太多這樣的問題了。百度都不會，就算了。問題都不會問，就更加難學會了。

如果要分別計算只能用vba來實現了，如果要單個計算，可以用subtotal和顏色篩選分列計算可能比較麻煩，但是能用

Excel裡面根據資料的顏色進行彙總，可以利用篩選、subtotal函式實現。

如下圖，要對字型顏色為紅色、綠色、黑色的分數進行彙總。

步驟：1.對資料按照顏色篩選，篩選綠色；

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

subtotal函式的引數9表示對篩選出來的內容進行求和，如果直接使用sum函式求和會把隱藏起來的也計算在內。

好了，以上操作就把綠色的資料彙總求和了，如果想要求其他顏色的也是一樣。

這個嗎貌似就有點不好文字給你描述，需要結合你自身的截圖給您回答。因為不知道您自身是什麼樣子的，所以 沒辦法給您準確的答案。您可以加一下我的QQ：1147302079 我給你詳細的說

自定義一個函式 color(a,b,c,d)

1、 C為true求和，否則計數；

2 、d為true按背景計算，否則字型計算；

Function Color(參照顏色區 As Range, 統計區 As Range, Optional SumOrCount As Boolean = False, Optional BackOrFont As Boolean = False)

Application.Volatile

Dim cell As Range, Colors, SUM, i

" 第三個引數是true 則求和，否則是計數

"第四引數是True則按背景色計算，否則按字型色計算

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

For Each cell In 統計區 "遍歷求和區

If BackOrFont Then

"背景色相同則累加數值及計數器

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

Else

"字型色相同則累加數值及計數器

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

End If

學好貴在看書與實踐

第一步：條件篩選

第二步：SUBTOTAL的函式對條件區域求和

說明：

篩選：SUBTOTAL的函式程式碼9和109都可以求篩選值的和，SUM求所有值的和

隱藏：SUBTOTAL的函式程式碼9會計算，109不會計算

SUBTOTAL函式教程

說明

返回 PI 與給定正數乘積的正平方根。

示例

SUBTOTAL(1,A2:A5,B2:B8)

語法

SUBTOTAL(函式程式碼,範圍1,[範圍2,...])

函式程式碼

用於計算分類彙總的函式。 1代表AVERAGE 2代表COUNT 3代表COUNTA 4代表MAX 5代表MIN 6代表PRODUCT 7代表STDEV 8代表STDEVP 9代表SUM 10代表VAR 11代表VARP 透過在這些2位程式碼前附加10（對於1位程式碼）或1（對於2位程式碼），可以將隱藏值忽略。例如，102代表忽略隱藏單元格的COUNT，而110則代表忽略隱藏值的VAR。

範圍1

要計算分類彙總的第一個範圍。

範圍2...-可重複-[可選]

[可選] - 要計算分類彙總的其他範圍。

實戰

https://www.leiniao365.com/work/table/26134647