无法评估COUNTIF函数的条件格式

我有问题检查，如果我的条件格式等同于VBA中的true。 格式化在电子表格上正常工作并更改单元格颜色，但VBA显示使用COUNTIF函数时不应用任何调整。

在一个范围内的每个单元格上，我已经设置了三个条件：

1: =WEEKDAY(DATE($B$4,$A$5,$C$4),2)>5 - Changes colour if the day is a weekend (light blue) 2: =COUNTIF($AL:$AL,DATE($B$4,$A$5,$C$4))>0 - Checks a range (AL column) to see if the date appears in it (dark blue) 3: =COUNTIF($AM:$AM,DATE($B$4,$A$5,$C$4))>0 - Same as above but checks a different column (yellow) 

它是一个假期电子表格。 AL栏包含所有设定的公共假期，AM栏包含公司设置的假期。 日历然后在周末和假日突出显示网格

B4 – A5年 – C4月 – date

A5和C4地址的变化取决于什么单元格被选中，但是我不得不使用绝对地址作为评估不适用于相对地址。

在我的VBA代码中，我需要检查是否已经应用了一个条件，并将公共HOL的值设置为“P”，对公司HOL的值设置为“Z”。 运行VBA时，它不能识别这些条件已经满足。

条件1被拾取为TRUE，但是即使颜色在纸上已经改变，也不会看到何时满足了其他两个条件？

我试着拿出COUNTIF里面的DATE，硬编码一个string，但仍然没有在VBA中find，所以不是这样。

要返回VBA中的活动状态，我正在使用：

 For Ndx = 1 To Rng.FormatConditions.Count Set FC = Rng.FormatConditions(Ndx) If Application.Evaluate(FC.Formula1) Then ActiveCondition = Ndx Exit Function End If Next Ndx