1.在单元格中 C4=VLOOKUP(B4, 简码表 !$B$4:$C$1000,2,FALSE)
2. Worksheet_Change事件代码:Private Sub Worksheet_Change(ByVal Target As Range)
On error resume next
If Target.Row 》 3 And Target.Column = 2 Then
i = Target.Row
Cells(i, 3) = Application.WorksheetFunction.VLookup(Cells(i, 2), Sheets(“简
声明:本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人,不代表电子发烧友网立场。文章及其配图仅供工程师学习之用,如有内容侵权或者其他违规问题,请联系本站处理。 举报投诉
全部0条评论
快来发表一下你的评论吧 !