input单元格地址，获取表名

我正在寻找一些Excel VBA代码，当我input一个单元格地址时，它会给我这个单元格分开的表的名称，并将该表的名称存储在一个variables中。 我也想将这个单元地址存储在一个名为“GetCellsTable”的variables中。

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

例：

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

Answer 1

 MyVariable = SomeCell.ListObject.Name 

编辑：

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

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

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

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