Excel 如果相邻单元格匹配，则链接不同工作表中的单元格

我想做下一个函数

如果工作表1中A的第一个单元格等于工作表2中A的单元格（调用函数的位置），则工作表2的B列中与其相邻的空单元格将更改为工作表1的B列中与其相邻单元格的数据。如果它们不相等，则在工作表1中的下一行尝试，直到找到匹配项为止

床单看起来有点像这样：

工作表1

A       B    

1 11:10   a

2 11:11   b

3 11:12   c

工作表2

  A      B        

1 11:11  function

2 11:14  function

Sub match()
Dim w1 As Worksheet, w2 As Worksheet
Dim FRow1 As Long, FRow2 As Long, m as Long, i As Long, j As Long
Dim str1A As String, str12A As String

Set w1 = Sheet1
Set w2 = Sheet2

m=w1.Rows.Count

Frow1 = w1.Range("A"& m).End(xlUp).Row
Frow2 = w2.Range("A"& m).End(xlUp).Row

For i=1 to FRow1
  str1A = Trim(w1.Range("A" & i).Text)
  str2A = Trim(w2.Range("A" & i).Text)

 if str1A = str2A then
     w2.Range("B" & i) =""
 Else: End if

Next i

End Sub