如何在Excel中的一系列單元格中求和/計數粗體數字？

如果您的數據范圍包含工作表中的一些粗體數字，而現在您只想對粗體單元格進行求和或計數，那么您當然可以手動將它們一一加起來，但這會很費時。 您如何以一種簡便快捷的方式對Excel中的粗體單元格求和或計數？

使用用戶定義的函數（VBA和公式）計算范圍內的粗體數字

使用用戶定義的函數（VBA和公式）將范圍內的粗體數字求和

多次單擊以對范圍內的粗體單元格進行計數和求和 Kutools for Excel使用用戶定義函數計算范圍內的粗體數字

下列 用戶定義功能 可以幫助您快速獲取粗體單元格的數量。 請這樣做：

1。 按住 ALT + F11 鍵，然后打開 Microsoft Visual Basic for Applications窗口.

2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到 模塊窗口.

VBA代碼：在一系列單元格中計算粗體數字

Function CountBold(WorkRng As Range)Update 20220516Dim Rng As RangeDim xCount As DoubleFor Each Rng In WorkRngIf Rng.Font.Bold ThenxCount = xCount + 1End IfNextCountBold = xCountEnd FunctionCopy

3. 然后保存此代碼，然后鍵入此公式 = CountBold（A1：C9） 放入空白單元格，請參見屏幕截圖：

4。 然后按 輸入 鍵，您將計算A1：C9范圍內的粗體單元格。

請注意：A1：C9 公式中的表示要使用該功能計算粗體單元格的范圍，您可以根據需要進行更改。

使用用戶定義的函數求和范圍內的粗體數字

而且，如果您只想對數據范圍內的粗體數字求和，我也可以創建一個用戶定義的函數來解決它。

1. 按住 ALT + F11 鍵，然后打開 Microsoft Visual Basic for Applications窗口.

2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到 模塊窗口.

VBA代碼：求和一系列單元格中的粗體數字

Function SumBold(WorkRng As Range)Update 20220516Dim Rng As RangeDim xSum As DoubleFor Each Rng In WorkRngIf Rng.Font.Bold ThenxSum = xSum + Rng.ValueEnd IfNextSumBold = xSumEnd FunctionCopy

3。 然后保存此代碼，然后鍵入此公式 = sumbold（A1：C9） 放入空白單元格，請參見屏幕截圖：

4. 然后按 輸入 鍵，則將A1：C9范圍內的所有粗體數字相加。 看截圖：

請注意：A1：C9 公式中的表示要使用該函數求和粗體單元格的范圍，可以根據需要進行更改。

多次單擊以對范圍內的粗體單元格進行計數和求和 Kutools for Excel

Y只需單擊幾下，您就可以輕松地對范圍內的所有粗體單元格進行計數或求和，而無需處理復雜的VBA代碼和記住公式。

申請前 Kutools for Excel請 首先下載并安裝.

1.要計算粗體單元格，請選擇一個空白單元格以查找結果，然后單擊 Kutools > Kutools 主要工作內容 > 統計與數學 > 計數字體.

要匯總粗體單元格，請單擊 Kutools > Kutools 主要工作內容 > 統計與數學 > 字體粗體。 看截圖：

2.在F功能參數 對話框中，在“引用”框中使用您需要計數或求和的粗體單元格指定范圍，然后單擊 OK 按鈕。

現在，將立即在選定的單元格中填充指定范圍內所有粗體單元格的計數或求和。 看截圖：

如果您想（30-day) 這個實用程序， 請點擊下載，然后按照上述步驟進行操作。

保持公式單元格引用不變 Kutools for Excel相關文章:

如何在Excel中識別并選擇所有粗體單元格或文本？

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel