如何获得活动工作表中唯一的数据表的参考

我正在使用以下方法在活动工作表中添加一个新行：

ActiveSheet.ListObjects("MyDataTable1").ListRows.Add(AlwaysInsert:=True) 

问题是它依赖于表名“MyDataTable1”。 如果我将活动工作表更改为表名称为“MyDataTable2”的工作表，则必须更改我的代码。 有没有办法自动在活动工作表中查找表格，以便我不必每次在工作表之间切换时更改代码？

Answer 1

如果每张纸只有一张表比使用

 ActiveSheet.ListObjects(1).Name 

检索ListObjects集合中第一个表的名称。