自动对同一行有颜色的单元格求和

你的这个问题只能用VBA来解决. 如果你稍微懂一点VBA,下面的操作很容易就解决你的问题了,如果你一点不懂VBA,可以把文件发给我,我帮你做好按钮,你直接按按钮就得到结果了, Q-三五零一四零七零三

同时按 alt + f11 打开VBA代码编辑器, 在左边右击任何一个文件名新建一个模块,双击新建的模块,在代码区域中粘贴代码:

Sub test()

Dim rng As Range

Dim rng1 As Range

k = 0

Set rng = Sheet1.Range("b4:n21") '这里的b4:n21 需要更改你自己需要计算的区域

For Each rng1 In rng

    If rng1.Interior.Color = 65535 Then '纯*的代码是65535,如果你的不是纯*,需要先提取颜色代码

    k = k + rng1.Value

    End If

Next

Sheet1.Range("p4") = k

End Sub

本文如未解决您的问题请添加抖音号：51dongshi（抖音搜索懂视），直接咨询即可。