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

Question

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

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 的单元格。步骤：

Select Sheet2 上要计算的所有单元格
转到Home/Styles/Conditional Formatting
SelectNew Rule，然后Use a formula to determine...
输入这个公式：=COUNTIF(Sheet1!$A:$A,A1)=0
单击“格式”按钮，为唯一单元格设置格式
好的
利润。 :)

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

Highlight unique values based on another range

excel

vba

highlight

vlookup