Question

我试图让我的代码仅通过表引用范围（这样，如果我从表中添加或删除列，则代码将不会更改）。我有一个名为MyTable的表。该表的标题为“ MyHeader”。

这是表格的最后一行：

dim numRecords as integer
numRecords  = sheet1.listobjects("MyTable").listRows.count

现在，我有一个函数，该函数接收一个范围类型参数并将其放在此范围内。

我希望函数接收列在“ MyHeader”列和行号numRecords上的单元格。我如何获得此单元格的范围（仅引用表格而不引用工作表的行或列）？

谢谢

Answer 1

您可以使用类似的内容：

With Sheet1.ListObjects("MyTable").ListColumns("MyHeader").DataBodyRange
    .Cells(.Rows.Count, 1).Value = "test"
End With

Answer 2

@Rory确实回答了我有关引用表中特定单元格的问题。在[this question][1]的帮助下，我弄清楚了如何引用表中的一系列单元格，以防对任何人有帮助：

Dim tbl As ListObject
dim StartRow as integer

startRow = 2
Set tbl = Track.ListObjects("MyTable")

tbl.ListColumns("MyColumn").DataBodyRange.Offset(startRow).Resize(tbl.ListRows.Count - startRow ) = "SomeValue"

vba获取表中特定单元格的范围（listobject）

2 个答案: