请大家帮告诉我如何在Excel里快速自动填充对应数据,具体情况如下:

2025-01-05 08:39:03
推荐回答(3个)
回答1:

用VBA来完成方便
把如下代码粘贴到sheet2表对应VBA编辑栏中即可
当在sheet2表B列第二行开始输入姓名时,对应A列自动填写sheet1该姓名对应的员工工号。如果没有该员工,就弹出提示没有该员工。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim arr
Dim R&, R1&, x&
With Sheets("sheet1")
R = .Range("A65536").End(xlUp).Row
arr = .Range("A1:B" & R).Value
End With
If Target.Column = 2 And Target.Count = 1 And Target.Row > 1 Then
R1 = Target.Row
For x = 1 To UBound(arr)
If arr(x, 2) = Target.Value Then
Cells(R1, 1) = arr(x, 1)
End
End If
Next x
MsgBox "没有叫" & Target.Value & "的员工!"
End If
End Sub
非用公式就用楼上老师的公式

回答2:

sheet2表的A1单元格输入公式
=IF(ISERROR(OFFSET(Sheet1!$A$1,MATCH(B1,Sheet1!B:B,0)-1,,)),"",OFFSET(Sheet1!$A$1,MATCH(B1,Sheet1!B:B,0)-1,,))
下拉

回答3:

用函数 VLookup 具体见函数说明