excel - ListObject 表行数

Question

我有一个 Excel 表格，其中包含一个标题行和一个数据正文行。我想计算数据主体行数。当我试图检查我的表有多少行时

Set myWorkSheet= ActiveWorkbook.Worksheets("Sheet1")
Set myTable= myWorkSheet.ListObjects("Table1")
countrows = myTable.ListRows.Count

countrows 包含 0。如果有 2 行或更多行，它会给出正确的行号。为什么一行显示 0，这是计算行数的最佳方法还是有更好的方法？

编辑:

找出导致问题的原因。在再次填充之前，我使用此行来清除表格:

If tblChart.ListRows.Count >= 1 Then
    myTable.DataBodyRange.Delete
End If

在该操作之后，表格看起来就像我所描述的那样。没有它并修改表格看起来像我描述的它工作的表格。但为什么会导致这个问题呢？

Answer 1

您要查找的 ListObject 属性是 .DataBodyRange。

    Dim myWorkSheet As Worksheet, myTable As ListObject, countRows As Long
    Set myWorkSheet = ActiveWorkbook.Worksheets("Sheet1")
    Set myTable = myWorkSheet.ListObjects("Table1")
    countRows = myTable.DataBodyRange.Rows.Count
    Debug.Print countRows

ListObject 属性的完整列表位于:ListObject Interface .