vba - 使用查找或宏从 Excel 表中获取价格

Question

我在excel中有表格“PriceList”，结构如下

Type       Thickness     width    Height     Price
iron          5            7        10         20
iron          10           10       15         24
iron          12           14       17         26

如果有人使用 vlookup 或宏输入类型铁，厚度 10，宽度 9，高度 14，我如何找到价格。我曾尝试使用 vlookup，但它不起作用，后来我在 google 上发现 Vlookup 仅使用一个参数检索数据。我可以像我们使用查询选择工作表数据那样使用宏来做到这一点吗

select * from [sheet1$] where col1=x

请建议？？

编辑:我使用 this 计算了上述内容.现在我在工作表更改事件上调用这个宏，如下所示

    Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 41 Or Target.Column = 43 Or Target.Column = 45 Or Target.Column = 46 Then
Dim i As Currency
i = Calculate_CorePrice(cell(Target.Row, 46).Value, cell(Target.Row, 45).Value, cell(Target.Row, 41).Value, cell(Target.Row, 43).Value, "RWJ Doorset Schedule", "ED15")
cell(Target.Row, 134).Value = i
End If

End Sub

如果我使用硬编码值调试函数本身，它正在工作，但如果我按上述方式调用函数，它不会返回值，我无法调试 sheet_change 事件。

我该如何调试这个事件。

Answer 1

假设您的列是 A、B、C 等。您可以将索引/匹配公式用作数组(使用 CTRL+SHIFT+ENTER 输入)。

如果用户在 W1 中输入类型、厚度、宽度和高度, X1 , Y1 , 和 Z1 ， 您可以使用:
=Index($E$2:$E$10,Match(W1&X1&Y1&Z1,$A$2:$A$10&$B$2:$B$10&$C$2:$C$10&$D$2:$D$10,0))
它很复杂，但基本上是 Match部分是您正在寻找W1在 A2:A10 范围内, 那么 X1 中的任何内容，您将搜索 B2:B10 ， ETC。