在Excel中，我們經(jīng)常需要對數(shù)據(jù)進(jìn)行統(tǒng)計和計算，而有時候我們也會需要計算填充顏色的單元格個數(shù)。Excel2007內(nèi)置了一些函數(shù)來幫助我們進(jìn)行這樣的計算，比如COUNT、COUNTA、COUNTIF、

在Excel中，我們經(jīng)常需要對數(shù)據(jù)進(jìn)行統(tǒng)計和計算，而有時候我們也會需要計算填充顏色的單元格個數(shù)。Excel2007內(nèi)置了一些函數(shù)來幫助我們進(jìn)行這樣的計算，比如COUNT、COUNTA、COUNTIF、COUNTIFS和COUNTBLANK等。但是要計算填充顏色的單元格個數(shù)，我們需要自定義函數(shù)來實現(xiàn)。下面將分享如何自定義一個函數(shù)來處理這一問題。

自定義Excel函數(shù)計算填充顏色個數(shù)

1. 首先打開Microsoft Office Excel 2007，新建文檔并保存文件名為《Excel怎樣計算填充色個數(shù).xlsm》。

2. 按下快捷鍵ALT F11打開VBA（宏）編輯界面，然后選擇菜單欄【插入】中的【模塊（M）】。

3. 在插入的模塊中，復(fù)制以下代碼：

```vba

Option Base 1

Function COUNTCR(m As String, r As Range)

Dim rn As Range, k As Long, mb(10, 2)

mb(1, 1) "深紅"

mb(2, 1) "紅色"

mb(3, 1) "橙色"

mb(4, 1) "黃色"

mb(5, 1) "淺綠"

mb(6, 1) "綠色"

mb(7, 1) "淺藍(lán)"

mb(8, 1) "藍(lán)色"

mb(9, 1) "深藍(lán)"

mb(10, 1) "紫色"

mb(1, 2) 192

mb(2, 2) 255

mb(3, 2) 49407

mb(4, 2) 65535

mb(5, 2) 5296274

mb(6, 2) 5287936

mb(7, 2) 15773696

mb(8, 2) 12611584

mb(9, 2) 6299648

mb(10, 2) 10498160

For Each rn In r

If (m, mb, 2, False) Then

k k 1

End If

Next rn

COUNTCR k

End Function

```

使用自定義函數(shù)計算填充顏色個數(shù)

1. 返回到工作表窗口，在需要計算的單元格中輸入函數(shù)`COUNTCR`，語法規(guī)則為：`COUNTCR(顏色值或顏色值的單元格, 單元格區(qū)域)`。

2. 例如，可以使用以下公式來計算紅色單元格的個數(shù)：`COUNTCR("紅色", B3:D3)`。

3. 根據(jù)不同的顏色值和單元格區(qū)域，可以通過這個自定義函數(shù)快速準(zhǔn)確地計算填充顏色的單元格個數(shù)。

以上就是如何在Excel中自定義函數(shù)來計算填充顏色的單元格個數(shù)的方法。希望這篇文章對您有所幫助，如果覺得內(nèi)容有價值，請點贊支持！如有任何疑問，也歡迎在下方留言提出，謝謝！