VlookUP函数只能返回第一个值，无法返回多个值
下面这个自定义函数可以解决这个问题
可以这么理解，是Vlookup函数返回多个值，将其对应的所有值都列出来
Function LookS(rng As Range, rg As Range, i As Byte, ii As Integer)
‘第1参数为查找的单元格，第2参数是查找范围，第3参数为返回的列，第4参数为返回的第几个值
‘第1参数和第2参数都要锁定行
Dim arr, a%, x%
arr = rg
For a = 1 To UBound(arr, 1)
If arr(a, 1) = rng Then
x = x + 1
If x = ii Then LookS = arr(a, i): Exit For
End If
Next
If a > UBound(arr, 1) Then LookS = ""
End Function
excel vba中Vlookup返回多个值 自定义函数
【excel vba中Vlookup返回多个值 自定义函数】excel vba中Vlookup返回多个值 自定义函数
推荐阅读
- EXCEL自定义函数求1000以内的质数
- Excel怎么统计单元格内字符出现次数
- excel Vlookup函数第四个参数等于1时的重要应用
- Excel VBA过程和函数使用基础价赔偿
- 怎么拆分Excel单元格日期与时间？
- Excel VBA一个简单例子，VBA快速入门
- excel VBA标识符
- 怎么获取当前时区并在Excel中的单元格中显示？
- excel实现按颜色求和与计数函数
- 利用excel宏命令完成财务指标的计算