有时候我们希望动态添加工作表。前面也分享过一些添加工作表的示例。

这里说一下几种简单的添加工作表的代码。可以在当前工作簿的前后添加一张或者多少工作表

详细代码：

Sub AddWorksheet()      '在当前工作簿中添加一个工作表     Worksheets.Add          '在当前工作簿中的工作表sheet2之前添加一个工作表     Worksheets.Add before:=Worksheets("sheet2")            '在当前工作簿中的工作表sheet2之后添加一个工作表     Worksheets.Add after:=Worksheets("sheet2")           '在当前工作簿中添加3个工作表     Worksheets.Add count:=2       End Sub

运行代码，excel工作簿在不同的位置自动创建了多个工作表