从另一个单元格值中突出显示单元格（动态范围）

Question

在挖掘了非常相似的帖子后，我无法找到满足我独特要求的解决方案。 到目前为止，我已经能够使用这些线程构建一个公式，但我只是对有两个 IF 语句感到困惑。

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If ActiveCell.Address = "$U$14" Then
    Dim rng As Range, cell As Range, LastRow As Long

    With Sheets("Sheet4")
        LastRow = .Range("B" & .Rows.Count).End(xlUp).Row
    End With

    Set rng = Range("A2:A" & LastRow)

    'If O2:O200 is BLANK then highlight corresponding row (xlUp) in Column A yellow
    For Each cell In rng
        cell.Interior.ColorIndex = 27
    Next
Else
    cell.Interior.ColorIndex = 2
End If

End Sub

我想要做的是对于从 O2 到 O & LastRow 的每个单元格，如果它是空白的，然后突出显示 A 列中的相应行(xlUp) 。

(xlUp) - 因为我希望它突出显示这个人的名字，而不仅仅是行，这意味着那个人还没有收集到一个项目。

然后当点击单元格 U14 时将其设置回正常。

对不起，它太草率了，我试着把我自己能想到的尽可能多的放进去。

例子：

Answer 1

感谢 Scott Craner 使用一些巧妙的条件格式解决了我的突出显示问题，为了解决通过激活单元格来切换条件格式的能力，我做了以下事情以防万一有人想知道：

我在删除所有格式并选中“如果为真则停止”的功能上方设置了条件格式。 使用的公式是：

    =NOT($U$12)
'U12 is the dedicated cell for displaying TRUE or FALSE, use any cell

然后，我使用以下 VBA 基本上将单元格切换为真或假，然后触发无格式条件为真，如果选择特定单元格，则为假：

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If ActiveCell.Address = "$U$14" Or ActiveCell.Address = "$U$13" Then
    Range("$U$12").Value = True
Else
    Range("$U$12").Value = False
End If

End Sub

现在，每当我突出显示单元格 U13 或 U14 时，A 列中尚未收集的所有名称都将突出显示。