Table VLOOKUP 参考 VBA

Question

我正在尝试使用 table 作为我使用 VBA 的 VLOOKUP 函数的参考，但它似乎不起作用。有人可以帮帮我吗？我的猜测是我没有正确调用 tables。

一些信息：

Table_3 和 Table1 设置 tables
两个都不固定（数据加进去了）

Range("Table_3[Status]") = Application.WorksheetFunction.VLookup(Range("Table_3[Part_Number]"), Range("Table1[[#All];[Part Number]:[Status]]"), 3, False)

Answer 1

你可以试试：

Option Explicit

Sub test()

    Dim tbl1 As ListObject, tbl3 As ListObject

    'Set you sheet
    With ThisWorkbook.Worksheets("Sheet1")
        'Set tables
        Set tbl1 = .ListObjects("Table1")
        Set tbl3 = .ListObjects("Table_3")
        tbl3.ListColumns("Status").DataBodyRange.FormulaR1C1 = "=VLOOKUP([Part Number],Table1[#All],3,FALSE)"
    End With

End Sub

Table VLOOKUP 参考 VBA

Table reference for VLOOKUP VBA

excel

vba

vlookup