0

VBA を使用して VLOOKUP 関数の参照としてテーブルを使用しようとしていますが、うまくいきません。誰か助けてくれませんか？私の推測では、テーブルを適切に呼び出していません。

いくつかの情報:

  1. Table_3 と Table1 は設定されたテーブルです
  2. どちらも固定ではありません（データが追加されます）
Range("Table_3[Status]") = Application.WorksheetFunction.VLookup(Range("Table_3[Part_Number]"), Range("Table1[[#All];[Part Number]:[Status]]"), 3, False)
4

1 に答える 1

0

あなたは試すことができます：

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
于 2019-05-29T10:53:37.517 に答える