|
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★ 免费下载 ★ ★ 使用帮助★
问题:在同一个工作表中,已经成功实现利用index+match组合函数,查找值;但是跨工作表查找就报错,不知道是什么原因,望各位师傅指导一下,多谢!
1、下图在同一工作表中:
在同一工作表中
Sub IndexMatch()
Dim i As Integer
For i = 2 To 4
Cells(i, 5).Value = WorksheetFunction.Index(Range(" b2:b4 "), _
WorksheetFunction.Match(Cells(i, 4).Value, Range(" a2:a4 "), 0))
Next i
End Sub
运行结果如下:
2、跨工作表查找
下表是待填表
下表是待引用表
代码如下:
Sub 查找()
Dim i As Integer
For i = 2 To 4
Cells(i, 2).Value = WorksheetFunction.Index(Worksheets("引用表").Range(" a2:b4 "), _
WorksheetFunction.Match(Cells(i, 1).Value, Worksheets("引用表").Range(" b1:b4 "), 0))
Next i
End Sub
运行结果如下:
|
|