有时候我们希望动态添加工作表。前面也分享过一些添加工作表的示例。
这里说一下几种简单的添加工作表的代码。可以在当前工作簿的前后添加一张或者多少工作表
详细代码:
Sub AddWorksheet() '在当前工作簿中添加一个工作表 Worksheets.Add '在当前工作簿中的工作表sheet2之前添加一个工作表 Worksheets.Add before:=Worksheets("sheet2") '在当前工作簿中的工作表sheet2之后添加一个工作表 Worksheets.Add after:=Worksheets("sheet2") '在当前工作簿中添加3个工作表 Worksheets.Add count:=2 End Sub
运行代码,excel工作簿在不同的位置自动创建了多个工作表