我有一张excel表,看起来像。
我想要一个类似的输出。
如果突出显示三列中的任何一个单元格,则该行的输出应为1
else 0
。输出列在链接的输出图像中名为count
。
例如:第一行中突出显示了单元格B2
和C2
,因此输出单元格D2
应为1
。 A4
,B4
和C4
没有任何突出显示的单元格,因此输出D4应为0
。
有人请帮我一个功能吗?
答案 0 :(得分:1)
Option Explicit
Function IsHighlighted(rng As Range) As Long
Dim r As Range
For Each r In rng
IsHighlighted = IsHighlighted Or CBool(r.Interior.Pattern <> xlNone)
Next r
IsHighlighted = Abs(IsHighlighted)
End Function