发布网友 发布时间:2022-04-23 08:58
共1个回答
热心网友 时间:2022-06-18 17:36
故可能是唯一办法
-
VBA自定义函数我刚写了一个简单的VBA,
绝对可以做到你的要求Function
COLORSUM(xx
As
Range,
yy
As
Range)
As
Doubley
=
yy.Font.ColorIndexFor
Each
x
In
xxIf
x.Font.ColorIndex
=
y
Thenxxx
=
xxx
+
x.ValueEnd
IfNextCOLORSUM
=
xxxEnd
Function假设你的数字是在A1:A100而A2的数字颜色是作为自动求和的识别只要将上述VBA贴在模块上,
COLORSUM函数便可以使用输入公式
=COLORSUM(A1:A100,A2)便会所有与A2相同颜色的数字,
自动求和请测试!