请用VBA代码解决,有A、B两列,求B列数据在A列中第一个相同数据的行号并填...答:Sub 查找()Dim I, J, rA, rB As Long rA = Cells(65536, 1).End(xlUp).Row rB = Cells(65536, 2).End(xlUp).Row For I = 1 To rB For J = 1 To rA If Cells(I, 2) = Cells(J, 1) Then Cells(I, 3) = J J = rA End If Next J Next I End Sub ...