Pivot table 在vb代码中使数据透视表名称动态化

在Excel2010中，我记录了创建多个数据透视表（一些在不同的工作表上）的宏步骤。但是，我很难让代码接受“动态”数据透视表名称。我的代码最初希望自动分配下一个数据透视表编号。例如，“数据透视表23”、“数据透视表24”等。由于我不知道工作簿中的下一个数字是什么，所以我将其更改为以下数字，当然它不起作用（我不熟悉使用vb代码）：

---

通过设置

CreatePivotTable

方法调用的相应参数，可以设置数据透视表的名称：

ActiveWorkbook.PivotCaches.Create(...). _
    CreatePivotTable TableDestination:="Sheet1!R3C1", TableName:="TOTAL" _
    , DefaultVersion:=xlPivotTableVersion14

有关CreatePivotTable方法的详细信息，请参见

ActiveWorkbook.PivotCaches.Create(...). _
    CreatePivotTable TableDestination:="Sheet1!R3C1", TableName:="TOTAL" _
    , DefaultVersion:=xlPivotTableVersion14