如何根據 Excel 中的字體顏色來計算或加總儲存格？

如何快速取得特定字體顏色的儲存格數量，或對這些儲存格進行加總？例如，您的工作表中有一組資料（如下方截圖所示），現在希望分別計算或加總字體為紅色、藍色與黑色的儲存格。一般來說，Excel 並未內建直接處理此類需求的功能，但本文將為您介紹幾種實用技巧，輕鬆達成目標。

使用自訂函數根據字體顏色計算或加總儲存格

使用實用函數根據字體顏色計算或加總儲存格

使用強大功能按顏色統計根據字體顏色計算或加總儲存格

使用自訂函數根據字體顏色計算或加總儲存格

根據字體顏色計算儲存格數量：

若要計算具有特定字體顏色的儲存格數量，請依照下列步驟操作：

1. 按住 ALT + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入＞ 模組，並將下列程式碼貼到模組視窗中。

VBA 程式碼：根據字體顏色計算儲存格數量：

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        CountColour = CountColour + 1
    End If
Next
End Function

3. 儲存此程式碼後，返回工作表，在空白儲存格中輸入下列公式 =CountColour(A1:D10,A2)，如下圖所示：

注意：在上述公式中，A1:D10 為您要使用的範圍，而 A2 則是包含您欲計數之特定字體顏色的儲存格。

4. 輸入公式後，按下 Enter 鍵，即可立即取得紅色字體儲存格的數量！若需計算其他字體顏色的儲存格，只需依需求重複輸入公式，輕鬆掌握結果：

根據字體顏色加總儲存格：

若要根據字體顏色加總儲存格數值，下列自訂函數可助您輕鬆達成目標。

1. 按住 ALT + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。

2. 點選插入> 模組，並將下列程式碼貼到模組視窗中。

VBA 程式碼：根據字體顏色加總儲存格：

Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
Dim xTotal As Double
xTotal = 0
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        xTotal = xTotal + rng.Value
    End If
Next
SumByColor = xTotal
End Function

3. 儲存此程式碼後，返回原始工作表，在空白儲存格中輸入下列公式 =SumByColor(A1:D8,A1)，如下圖所示：

注意：在上述公式中，A1:D10 為您要使用的範圍，而 A2 則是包含您欲加總之特定字體顏色的儲存格。

4. 接著按下 Enter 鍵，即可加總所有紅色字體的儲存格。若想加總其他顏色字體的儲存格，請重複輸入公式，您將獲得以下結果：

使用實用函數根據字體顏色計算或加總儲存格

若自訂函數對您來說過於繁瑣，推薦您使用超便利的工具－Kutools for Excel！透過其進階功能，立即輕鬆快速完成此任務。

安裝 Kutools for Excel 後，請依照下列步驟操作：

根據字體顏色計算儲存格數量：

1. 點選您要放置計數結果的儲存格，然後依序點選 Kutools > 增強函數 > 統計與數學 > COUNTBYFONTCOLOR，如下圖所示：

2. 在函數引數對話方塊中，指定您要依字型顏色統計的資料區域與顏色編號儲存格，如下圖所示：

3. 接著點選確定按鈕，即可取得第一筆計數結果；若需取得其他結果，只需複製此公式並依需求調整儲存格參照即可。如下圖所示：

根據字體顏色加總儲存格：

1. 點選您要放置計數結果的儲存格，然後依序點選 Kutools > 增強函數 > 統計與數學 > SUMBYFONTCOLOR，如下圖所示：

2. 在函數引數對話方塊中，指定您要依字體顏色加總的資料區域與顏色編號儲存格，如下圖所示：

3. 接著點選確定按鈕，即可取得第一筆加總結果；若需其他加總結果，只需複製此公式並依需求調整儲存格參照即可。如下圖所示：

立即點選下載 Kutools for Excel，免費試用！

使用強大功能按顏色統計根據字體顏色計算或加總儲存格

Kutools for Excel 也提供了一項簡單實用的功能－按顏色統計，透過此工具，您能根據需求，快速依儲存格的背景顏色、字體顏色或條件格式設定，立即取得計數、總和、平均值等計算結果！

安裝 Kutools for Excel 後，請依照下列步驟操作：

1. 選取您要依不同顏色進行計數與加總的資料區域。

2. 點擊 KUTOOLS PLUS 中的按顏色統計功能，請參閱截圖：

3. 在按顏色統計對話方塊中，先從標準格式化顏色模式下拉式清單中選擇字型，再於其下方的統計類型下拉式清單中選取所需項目，即可自動對相同字體顏色的儲存格執行計數、加總、平均等運算！詳情請參閱截圖：

4. 接著點擊生成報告按鈕，統計結果將立即顯示於新工作簿中。請參閱截圖：

立即點擊下載 Kutools for Excel，免費試用！

更多文章：

依據字型／背景／使用條件格式顏色計數或加總儲存格：

最佳 Office 生產力工具

🤖	KUTOOLS AI 助手：基於以下內容徹底革新數據分析：智慧執行   ｜  產生程式碼｜  建立自訂公式  ｜  分析資料並產生圖表｜  呼叫增強函數……
	熱門功能：尋找、醒目提示或標記重複值   ｜  刪除空白行   ｜  合併列或儲存格而不遺失資料   ｜  不使用公式的四捨五入……
	高級 LOOKUP：多重條件 VLookup  ｜  多重數值 VLookup  ｜   跨多個工作表 VLookup   ｜   模糊查找……
	高級下拉列表：快速建立下拉式清單   ｜  相依式下拉式清單   ｜  多選下拉式清單……
	欄位管理員：新增指定數量的欄位｜移動欄位｜切換隱藏欄位的可見狀態｜比較範圍與欄位……
	精選功能：網格聚焦   ｜  設計視圖   ｜增強編輯欄   ｜ 工作簿與工作表管理員   ｜  資源庫（自動文字）｜  日期提取   ｜  合併工作表  ｜  加密／解密儲存格   ｜ 依清單傳送電子郵件   ｜  超級篩選   ｜   特殊篩選（篩選粗體儲存格／斜體／刪除線……） ......
	頂尖 15 工具組：12 文字工具（添加文本，刪除特定字符，……）｜   50+ 圖表 類型（甘特圖，……）｜   40+ 實用公式（基於生日計算年齡，……）｜   19 插入工具（插入二維碼，從路徑插入圖片，……）｜   12 轉換工具（金額轉大寫，匯率轉換，……）｜   7 合併和拆分工具（高級合併行，分割儲存格，……）｜……以及更多

在您的慣用語言中使用 Kutools—支援英文、西班牙文、德文、法文、中文及另外 40+ 種語言！

運用 Kutools for Excel 強化您的 Excel 技能，體驗前所未有的高效能！Kutools for Excel 提供超過 300 項進階功能，大幅提升生產力並節省寶貴時間。立即點擊，取得您最需要的功能……

Kutools for Excel 詳細資訊……免費下載……

---

Office Tab 為 Office 帶來分頁式介面，讓您的工作更輕鬆自在！

• 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能，以及 Access、Visio 與 Project。
• 在同視窗的新分頁中開啟並建立多份文件，而非另開新視窗。
• 每天為您提升 50% 的工作效率，並省下數百次滑鼠點擊！

Office Tab 詳細資訊……免費下載……

---

所有 Kutools 增益集，一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集，以及 Office Tab Pro，非常適合需要跨多個 Office 應用程式協作的團隊使用！

• 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集，以及 Office Tab Pro
• 一個安裝程式，一個授權— 數分鐘內即可完成設定（支援 MSI）
• 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
• 30 天完整功能試用— 無需註冊，無需信用卡
• 超值之選— 比單獨購買各增益集更省費用

Kutools for Office 詳細資訊……免費下載……