基于活动行值突出显示单元格答案

【问题标题】：Highlighting Cells based on Active row Values基于活动行值突出显示单元格
【发布时间】：2020-05-15 08:46:24
【问题描述】：

我坚持试图让我的工作表根据活动单元格行值突出显示第 2 行中的值，在这种情况下，我将 cells "B2:F2" 与 进行比较在这种情况下，活动行 (B3:F3)。这是选择活动单元格/行之前工作表的外观；

一旦我选择了一个活动单元格（在本例中，我选择了单元格“A3”）并希望将 “B3:F3”单元格值与静态行 (B2:F2) 并突出显示 静态行 (B2:F2) 中与活动行值不同的所有单元格。以下屏幕截图是我选择 cell "A3" 作为活动单元格并让代码/条件格式组合将其与静态行值进行比较后工作表的外观；

到目前为止，我有这段代码突出显示了我正在选择的活动单元格，这是我的起点：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static xLastRng As Range
On Error Resume Next
Target.Interior.ColorIndex = 6
xLastRng.Interior.ColorIndex = xlColorIndexNone
Set xLastRng = Target
End Sub

如果有什么不明白的地方和你的建议，请告诉我，谢谢！

【问题讨论】：

你尝试过任何代码吗？
我尝试了一些来自谷歌和其他论坛的不同代码，包括这个，但到目前为止没有运气，我尝试使用这个链接来进一步理解条件格式的可能性：trumpexcel.com/highlight-rows-based-on-cell-value/…
从这里开始docs.microsoft.com/en-us/office/vba/api/…
请贴出你试过的代码。
@FreeSoftwareServers 我贴出来了

标签： excel vba conditional-statements highlight

【解决方案1】：

也许如下 - 基本上将您的固定范围 B2:F2 与当前行中的相应范围进行比较：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Me.Range("B2:F2").Interior.Color = xlNone 'clear previous coloring

    Dim rng As Range
    For Each rng In Me.Range("B2:F2")
        If IsNumeric(rng.Value) And IsNumeric(Me.Cells(Target.Row, rng.Column)) Then
            If rng.Value <> Me.Cells(Target.Row, rng.Column).Value Then
                rng.Interior.Color = vbYellow
            End If
        End If
    Next
End Sub

【讨论】：