使用参考范围的 Excel 条件格式

Question

我有一个手表范围，其中某些单元格突出显示为黄色。对于每个单元格，都有一个相应的参考值，全部位于一列中。

我想以红色突出显示目标范围内的所有单元格，其中相应参考单元格中的值与目标单元格中​​的值相匹配。

我想出的代码如下，但存在某种我无法修复的编译错误。显然手表范围不能由“多个范围”组成。

Sub Highlight_pairAB()
Dim WatchRange As Range, Target As Range, cell As Range, ref As Range
Set Target = Range("Y3:Y274", "AC3:AC274") 'change column ref as required
Set WatchRange = Range("B3:B274", "E3:E274", "H3:H274", "K3:K274")
Set RefRange = Range("A3:A102")

For Each cell In Target.Cells
    If Application.WorksheetFunction.CountIf(WatchRange, cell.Value) > 0 Then
        cell.Interior.ColorIndex = 3
        For Each watchCell In WatchRange.Cells
            If watchCell.Interior.ColorIndex = 6 And RefRange.Value = Target.Value Then: targetCell.Interior.ColorIndex = 3
        Next watchCell
    Else: cell.Interior.ColorIndex = xlNone
    End If
Next cell
End Sub

Answer 1

以防万一这有帮助：
更改：

Set WatchRange = Range("B3:B274", "E3:E274", "H3:H274", "K3:K274") 

至：

Set WatchRange = Range("B3:B274,E3:E274,H3:H274,K3:K274")

Answer 2

您可以尝试的另一件事是

For Each watchCell In WatchRange.Cells

用

For Each area In WatchRange.Areas
     For Each watchCell In area.Cells

编辑替换：您还需要两个“Next”语句才能匹配。所以一定要做到

    Next watchCell
Next area