excel按照颜色条件汇总函数的方法

办公教程导读

收集整理了【excel按照颜色条件汇总函数的方法】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含803字，纯文字阅读大概需要2分钟。

办公教程内容图文

　　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设置完毕。

　　颜色汇总函数使用步骤6：设置完成的函数SumByColor(Ref_color, Sum_range)，函数有2个参数：

　　颜色汇总函数使用步骤7：第一个是要想统计颜色的单元格(任意一个与要汇总颜色相同的单元格均可)，

　　颜色汇总函数使用步骤8：第二个是要汇总的单元格区域。

　　颜色汇总函数使用步骤9：如本例，在B16格中输入： =SumByColor(B15,B2:F13) 得出结果：1690748