如何使用 excel 中結構化引用表的特定連續列在 vba 中設置范圍？

Question

使用以下代碼時，我收到“無效的過程調用或參數錯誤..”：

Dim DTTbl As ListObject
Dim rng As Range

Set DTTbl = ThisWorkbook.Worksheets("DataTypes").ListObjects("DataTypes")
Set rng = DTTbl.Range("DataTypes[[ClassProperty]:[DataType]]")

請注意，工作表和表格都命名為“DataTypes”。 “ClassProperty”和“DataType”列是相鄰的。

如何將 rng 設置為使用列名提到的 2 列的“組合區域/范圍”？

Answer 1

你可以這樣做：

Dim col1 As Range, col2 As Range
Set col1 = DTTbl.ListColumns("ClassProperty").DataBodyRange
Set col2 = DTTbl.ListColumns("DataType").DataBodyRange

Set rng = ThisWorkbook.Worksheets("DataTypes").Range(col1.Address, col2.Address)
Debug.Print rng.Address