+ 1表示新工作表名称

Question

请假设该工作表将被称为枢轴，请为任何新工作表名称提供+ 1的代码。

因此，假设我们有一张名为pivot的工作表，我希望下一张工作表是第1个工作表，而工作表是第二个工作表。

Answer 1

您每次都要添加新表吗？如果是这样，试试这个：

Sheets.Add After:=ActiveSheet 'Adds a new sheet
Sheets(ActiveSheet.Name).Name = Pivot1

Sheets.Add After:=ActiveSheet
Sheets(ActiveSheet.Name).Name = Pivot2

根据需要重复。