获取Excel表格中第一个单元格的行号和列号

Question

我在代码中使用了很多表，我的表位于工作表中的某个位置。我知道我可以使用以下代码转到第一个单元格：

Worksheets("sheet").ListObjects("table").Range.Cells(1, 1).Activate

但我想将行号和列号存储在 2 个整数中，即。如果表的第一个单元格是 C4，则列 = 3 且行 = 4。

Worksheets("sheet").ListObjects("table").Row and Column are not working unfortunately

Answer 1

这将打印表格第一个单元格的行和列：

Public Sub TestMe()

    Dim tbl As ListObject
    Set tbl = Worksheets(1).ListObjects("Table1")
    Debug.Print tbl.Range.Cells(1, 1).Row
    Debug.Print tbl.Range.Cells(1, 1).Column

    'As a bonus:
    Debug.Print tbl.Range.Rows.Count        'total number of rows
    Debug.Print tbl.Range.Columns.Count     'total number of columns

End Sub

非常肮脏的方式，使用您的代码，它正在激活 Cells(1,1)：

Debug.Print ActiveCell.Row
Debug.Print ActiveCell.Column