excel - 输入单元格地址，获取表名

我正在寻找一些excel VBA代码，当我输入单元格地址时，它将为我提供该单元格所在的表的名称，并将表的名称存储在变量中。我还想将单元格地址存储在一个名为“ GetCellsTable”的变量中。

无论如何，我可以去做吗？

例：

Dim StoreTableName as String?
Dim GetCellsTable as ?
StoreTableName = Range(GetCellsTable).ListObject.Name

最佳答案

MyVariable = SomeCell.ListObject.Name

编辑：

如果要将单元格地址（例如单元格“ A3”）存储在变量中，然后使用它来获取表名：

Dim GetCellsTable As String
GetCellsTable = "A3"
MyTableName = Range(GetCellsTable).ListObject.Name

或者，如果要将单元格本身作为范围对象存储在变量中：

Dim GetCellsTable as Range
Set GetCellsTable = Range("A3")
MyTableName = GetCellsTable.ListObject.Name