选择 DataBodyRange 中的行

Question

尝试编写 VBA Excel 代码来选择数据表中的一行。我的代码是：

ActiveSheet.ListObjects("MAIN_DATA").ListRows(3).DataBodyRange.Select

还想知道如何从此表中选择多行。

有什么建议吗？

Answer 1

@Tim 已经在评论中回答了你的问题。

希望示例对您理解语法有所帮助。

• 名为

  MAIN_DATA

的示例表

Option Explicit
Sub Demo()
    With ActiveSheet.ListObjects("MAIN_DATA")
        Dim rRows As Range
        Debug.Print "[ListObject].Range: " & .Range.Address
        Debug.Print "[ListObject].DataBodyRange: " & .DataBodyRange.Address
        Debug.Print "[ListObject].ListRows(3).Range: " & .ListRows(3).Range.Address
        Debug.Print "[ListObject].DataBodyRange.Rows(3): " & .DataBodyRange.Rows(3).Address
        Set rRows = .ListRows(1).Range
        Set rRows = Union(rRows, .ListRows(3).Range)
        Debug.Print "1st and 3rd rows: " & rRows.Address
    End With
End Sub

输出：

[ListObject].Range: $A$1:$B$7
[ListObject].DataBodyRange: $A$2:$B$7
[ListObject].ListRows(3).Range: $A$4:$B$4
[ListObject].DataBodyRange.Rows(3): $A$4:$B$4
1st and 3rd rows: $A$2:$B$2,$A$4:$B$4