excel - VBA Excel 条件格式 IF - THEN 日期

Question

我想使用以下规则进行条件格式化：

如果我的列 B 的单元格是紫色的，则在包含日期的列 A 上应用以下规则：

=TODAY()-A1>1<31 - 颜色粉红色 =TODAY()-A1>30<61- 颜色绿色

你明白了

但是，如果我在 B 列中的单元格的内容是蓝色的，那么我希望我在 A 列中的单元格也是蓝色的。我什至不知道我的公式是否正确。谢谢

Answer 1

您可以在条件格式规则中使用 UDF：

Function IsYellow(c) As Boolean
    IsYellow = (c.Interior.Color = vbYellow)
End Function

不过，只有在工作表重新计算时才会触发更新。

Answer 2

一个选项是走 VBA 路线，它会在你走的时候将“条件格式”应用于单元格。例如：

For A_row = 1 To 100
  If Range(A_row, "B").Interior.ColorIndex = my_color_index Then
    Range(A_row, "A").NumberFormat = my_custom_format
    'add desired custom number formats here
  End If
Next