excel按照颜色进行汇总的函数用法

Excel函数 2023-01-13

　　Excel中的汇总函数具体该如何按照颜色进行计算呢?下面是由小编分享的excel按照颜色进行汇总的函数用法，以供大家阅读和学习。

　　excel按照颜色进行汇总的函数用法：

　　按照颜色进行汇总步骤1：在EXCEL界面中，按下组合键　Alt + F11，弹出一个MicrosoftVisual Basic窗口。

　　按照颜色进行汇总步骤2：在窗口中，执行菜单操作：“插入”—>“模块”，如下图。

　　按照颜色进行汇总步骤3：看到一个“(通用)”的窗体，这个窗体就是用来输入VBA代码的窗体，如下图：

　　按照颜色进行汇总步骤4：将如下代码粘贴到该窗体中：

　　FunctionSumByColor(Ref_color As Range, Sum_range As Range)

　　Application.Volatile

　　Dim iCol As Long

　　Dim rCell As Range

　　SumByColor = 0

　　iCol =Ref_color.Interior.ColorIndex

　　For Each rCell InSum_range

　　If iCol = rCell.Interior.ColorIndex And WorksheetFunction.IsNumber(rCell) Then

　　SumByColor = SumByColor + rCell.Value

　　End If

　　Next rCell

　　End Function

　　结果如下图：

　　按照颜色进行汇总步骤5：关闭Microsoft VisualBasic窗口，返回到EXCEL窗口，函数SumByColor设置完毕。

　　设置完成的函数SumByColor(Ref_color, Sum_range)，函数有2个参数：

　　第一个是要想统计颜色的单元格(任意一个与要汇总颜色相同的单元格均可)，

　　第二个是要汇总的单元格区域。

　　如本例，在B16格中输入： =SumByColor(B15,B2:F13) 得出结果：1690748