突出显示基于另一个范围的唯一值

Question

第 1 列在 Sheet1 中，第 2 列在 Sheet2 中。如果未找到该值，则突出显示该单元格。我正在尝试比较两列。我认为 语法不正确。请在下面查看我正在尝试的代码：

Option Explicit

Sub VlookupColoums()
   ' declarations
    Dim lookFor As Range
    Dim srchRange As Range
    Dim I As Long
    Dim vtest As Variant
    ' start
    Set lookFor = Sheets("Sheet1").Range("A13").End(xlUp)
  Set srchRange = Sheets("Sheet2").Range("A2").End(xlUp)
  vtest = Application.VLookup(lookFor.Rows.Count, srchRange.Rows.Count, 2, False)
    ' process
   For I = 1 To lookFor.Rows.Count
    If IsError(vtest) Then
srchRange.Interior.Color = 4
Else
Exit Sub
End If
Next I


End Sub

Answer 1

假设您在 Sheet1!A1:A15 和 Sheet2!A1:A10 上有数据。

还假设您要突出显示 Sheet2 上的唯一单元格（在另一个列表中没有至少一个相同的单元格）。

基本上，您希望格式化所有在另一个列表中计数为 0 的单元格。步骤：

1. 选择要在 Sheet2 上评估的所有单元格
2. 转到Home/Styles/Conditional Formatting
3. 选择New Rule，然后选择Use a formula to determine...
4. 输入这个公式：=COUNTIF(Sheet1!$A$1:$A$5,A1)=0
5. 单击“格式”按钮，为唯一单元格设置格式
6. 好的
7. 利润。 :)