0

我有一系列具有条件格式的单元格,如果单元格超过某个阈值,它将用红色填充(我相信它是 .color = 255)。

我正在尝试创建一个宏,该宏将通过搜索 .color = 255 的单元格来搜索该范围内超过阈值的单元格。由于某种原因,该宏无法正常工作。由于条件格式,无法看到单元格是红色的。不过,它可以检测到我只需手动将填充更改为红色的单元格。

Sub macro22()
   For Each m In Range("D7:L33")
      If m.Interior.Color = 255 Then
          ex = "exceedance"
      End If
Next

  Range("p22").Value = ex

End Sub

我知道它是 .color = 255 因为如果我记录一个宏来更改单元格的填充颜色以匹配我想要的条件格式的颜色,那就是它得出的值。

4

2 回答 2

0

如果您只有一个 CF 规则,您应该检查m.FormatConditions(0).Interior.Color值而不是m.Interior.Color- 如上面更详细的响应) 0表示 CF 规则的数量,但从 0 开始(至少应该这样引用)。

于 2013-01-10T18:55:36.027 回答
0

如果通过条件格式应用颜色函数,它不会返回颜色。请参阅此处了解替代方法

于 2013-01-10T18:42:38.287 回答