Excel用VBA点击表一某个单元格，通过该单元格中的数据匹配并跳转到表二，并且将相匹配的数据哪一行标红？

Question

点击某一单元格，从另一张表中次查找数据，并标色

Answer 1

Public Sub Worksheet_selectionChange(ByVal Taget As Range)
Dim cel As Range
For Each cel In Sheet2.UsedRange
  cel.Interior.Color = xlNone
  If cel = ActiveCell Then
  cel.Interior.Color = RGB(255, 0, 0)
End If
Next
Sheet2.Activate
End Sub