请帮助编写一个excel中自定义的宏

来源：百度知道 编辑：UC知道 时间：2024/06/06 06:18:51
请各位老师帮助编写一个多条件查找的函数
在excel中VLOOKUP等只能单条件查找，使用不是很方便，请帮忙。
对不起，我要的是，类似VLOOKUP的查找函数，但是是要“多条件查找”
用宏编写的自定义函数

可以使用IF语句，if最多可以用七层嵌套，应该可以满足一般的办公条件需求。

按住ALT,依次按F11,I,M。
将下面的代码粘贴至模块1中。
然后就可以在工作表中使用下面的公式了
=VLOOKUPS(A1,A2,B:D,1,2,3)
公式具体含义是：在B:D区域的第1列查找A1值，同时在第2列查找A2值，当2个条件都符合时返回第3列对应行的值。

如果有更多条件，可以再给自定义函数增加参数，同时增加if+then的嵌套

Function VLOOKUPs(lookup_value1, lookup_value2, table_array, col_index_num1, col_index_num2, col_index_num)
With table_array
For r = 1 To WorksheetFunction.Min(.Rows.Count, Cells(65536, .Column).End(xlUp).Row - .Row + 1)
If lookup_value1 = .Cells(r, col_index_num1) Then
If lookup_value2 = .Cells(r, col_index_num2) Then
VLOOKUPs = .Cells(r, col_index_num)
Exit Function
End If
End If
Next r
End With
VLOOKUPs = "没有符合条件的数据"
End Function

if语句使用方法

if(你的条件:符合条件的返回值或公式,不符合条件的返回值)

嵌套if(if())等.这样你就可以根据你的要求来编函数了

如果需要的话,把你的条件写出来.大家帮忙