excel vba中Vlookup返回多个值 自定义函数

excel vba中Vlookup返回多个值 自定义函数

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 = rgFor a = 1 To UBound(arr, 1)If arr(a, 1) = rng Thenx = x + 1If x = ii Then LookS = arr(a, i): Exit ForEnd IfNextIf a > UBound(arr, 1) Then LookS = ""End Function

excel vba中Vlookup返回多个值 自定义函数

excel vba中Vlookup返回多个值 自定义函数

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。