excel中如何按单元格背景颜色求和或计数

Excel技巧 2021-11-25 09:00:24

本文将讲述如何在excel中按背景颜色对单元格进行计数和求和。如何通过用户自定义函数来按单元格的背景颜色统计单元格的数量。如何在excel中按背景颜色求和单元格。

excel按背景颜色计算和求和单元格

在Microsoft Excel中没有用于按颜色计数或求和单元格的特定函数，因此您可以尝试编写新的用户定义函数，以根据背景颜色对单元格求和或计数。

假设您有一个表格，其中当前工作表中的单元格范围是有背景颜色的。如果要计算有色单元格的数量，例如，此单元格区域中的蓝色或红色数量，您可以创建新的用户定义函数来实现统计。

因此，您可以创建以下用户定义的函数，以按单元格的背景颜色对单元格进行计数和求和，只需参考以下步骤：

步骤1：打开您的Excel工作簿，然后单击开发工具选项卡下的“Visual Basic”命令，或者只需按“ALT + F11”快捷方式。

Excel 中如何只複製內容和格式102

步骤2：然后将出现“Visual Basic编辑器”窗口。

Excel 中如何只複製內容和格式91

步骤3：单击“插入” – >“模块”以创建新模块。

Excel 中如何只複製內容和格式101

步骤4：将以下VBA代码粘贴到代码窗口中。然后单击“保存”按钮。

EXCEL中如何按单元格背景颜色求和或计数

Function CountColorByBgColor(sColor As Range, sRange As Range, Optional SUM As Boolean)
Dim gResult
Dim sCell As Range
Dim sCol As Long
sCol = sColor.Interior.ColorIndex
If SUM = True Then
For Each sCell In sRange
If sCell.Interior.ColorIndex = sCol Then
gResult = WorksheetFunction.SUM(sCell, gResult)
End If
Next sCell
Else
For Each sCell In sRange
If sCell.Interior.ColorIndex = sCol Then
gResult = 1 + gResult
End If
Next sCell
End If
CountColorByBgColor = gResult
End Function