VBA 按钮联动问题
你好,我有个问题。sheet1中有很多条人员数据(姓名、工号、工作情况...)sheet2中是一张履历表。当我点击sheet1中某一条数据的工号时,sheet2中就出现该...
你好,我有个问题。
sheet1 中有很多条人员数据(姓名、工号、工作情况...)
sheet2 中是一张履历表。
当我点击sheet1中某一条数据的工号时,sheet2中就出现该员工的信息。
请问VBA如何才能实现?
谢谢! 展开
sheet1 中有很多条人员数据(姓名、工号、工作情况...)
sheet2 中是一张履历表。
当我点击sheet1中某一条数据的工号时,sheet2中就出现该员工的信息。
请问VBA如何才能实现?
谢谢! 展开
2个回答
展开全部
大概的构思是这样的,把以下代码写到表1的SelectionChange事件中:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Column = 1 And .Row > 1 Then '设置工号范围:第一列第2行开始
Sheets(2).Range("姓名") = Sheets(1).Cells(.Row, 2) '假设在表一中姓名在第2列,把“姓名”替换成表2相应地址
'...插入你希望对应的其他信息
End If
End With
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If .Column = 1 And .Row > 1 Then '设置工号范围:第一列第2行开始
Sheets(2).Range("姓名") = Sheets(1).Cells(.Row, 2) '假设在表一中姓名在第2列,把“姓名”替换成表2相应地址
'...插入你希望对应的其他信息
End If
End With
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询