打开 VBA 编辑器
按下 ALT + F11 打开编辑器，点击“插入” > “模块”，然后粘贴自定义函数代码。
插入 VBA 代码
粘贴用于识别颜色索引并根据该索引对区域进行求和的函数代码。
使用自定义函数
回到工作表，输入 =SumByColor(区域, 颜色单元格) 来计算总和。
Function SumByColor(rng As Range, cellColor As Range) As Double不适用，此 VBA 方法仅能检测手动设置的单元格颜色，无法识别通过条件格式设置的颜色。