Question

我是VBA的完全新手，只需要一些帮助就可以使这段代码正常工作。这是代码

Private Sub cmdGenerateCost_Click()

Dim ws As Worksheet
Set ws = Application.Workbooks(1).Worksheets(2)
Set productsTab = ws.Range("Products")
Application.WorksheetFunction.VLookup

frmAddNewOrder.lblCost.Caption = "Cost: $" & txtQuantity * VLookup(cboProduct, productsTab, 4)

End Sub

但是我得到了一个＆＃34;论证不是可选的＆＃34;错误信息。

我需要代码做的是使用包含信息的工作表中的表来计算项目的成本，从而计算Vlookup，然后在userform中更改标签。工作表中的表名为Products，它位于名为Products的第二个工作表中。任何帮助将不胜感激

Answer 1

消息非常清楚，VLOOPUP是需要某些参数的函数。见https://support.office.com/en-us/article/VLOOKUP-function-0bbc8083-26fe-4963-8ab8-93a18ad188a1

所以你需要在调用中提供这些参数。类似于

的东西

Let cost = Application.WorksheetFunction.VLookup("item", productsTab, 4, False)

将找到项目＆＃34; item＆＃34;在您的范围内，将返回其第四列的内容。根据您的需要进行更改。

您还可以阅读https://support.office.com/en-us/article/VLOOKUP-What-it-is-and-when-to-use-it-5984e27b-4f0d-431e-83b1-7ab062c75493

VLookup功能 - 引用另一张表中的表格

1 个答案: