0

Excel テーブルの特定の行を参照しようとしていますが、「アプリケーション定義またはオブジェクト定義エラー」が発生します。これが行です:

ActiveWorkbook.Worksheets("MatchedDeals").Cells(i, "A") = _
    ActiveWorkbook.Worksheets("Data"). _
    Range("Table_ExternalData_1[[" & iStartingRow & "],[TransID]]")

whereiStartingRowには参照する行番号が含まれ、列をTransID表します。私は何を間違っていますか?

4

2 に答える 2

1

範囲を介してテーブルをアドレス指定する代わりに、テーブルをアドレス指定してみてください (VBA ではListObjectです)。

ActiveWorkbook.Worksheets("MatchedDeals").Cells(i, "A") = _
    ActiveWorkbook.Worksheets("Data"). _
    ListObjects("Table_ExternalData_1")._
    ListColumns("TransID").DataBodyRange(iStartingRow)
于 2013-05-31T19:23:57.567 に答える
0

以下のコードを試してください

Sub sample()

    iStartingRow = 2
    Set d = Sheets("Data").ListObjects("Table_ExternalData_1")
    Worksheets("MatchedDeals").Cells(i, "A")  = d.ListRows(1).Range.Cells(iStartingRow, 1)

End Sub
于 2013-05-31T19:53:14.050 に答える