枢轴条件格式设置颜色仅在范围的第一个单元中起作用

Question

如果我尝试使用以下代码将格式设置颜色设置为单元格区域：

Sub colora()
Dim rgn As Range
Set rgn = Range("E4:T8,E10:T16")
    rgn.FormatConditions.Add Type:=xlExpression, Formula1:="=$W4=E$3"
    rgn.FormatConditions(rgn.FormatConditions.Count).SetFirstPriority
    With rgn.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent1
        .TintAndShade = 0.399945066682943
    End With
    rgn.FormatConditions(1).StopIfTrue = True
    rgn.FormatConditions(1).ScopeType = xlSelectionScope
    rgn.FormatConditions.Add Type:=xlExpression, Formula1:="=$Z4=E$3"
    rgn.FormatConditions(rgn.FormatConditions.Count).SetFirstPriority
    With rgn.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent3
        .TintAndShade = 0.399945066682943
    End With
    rgn.FormatConditions(1).StopIfTrue = False
    rgn.FormatConditions(1).ScopeType = xlSelectionScope
End Sub

我播放此宏，但结果错误，然后检查功能区选项卡上的格式化功能，以证明这一点。

为什么适用的格式范围从Range("E4:T8,E10:T16")更改为E4？！？！