1、打开一个Excel表格,如下图所示。
2、按下Alt+F11,打开VBA编辑界面,点击左上角的额工作表,右侧出现对应的VBA编辑区,如下图所示。
3、编写代码:Sub 鱼木混猪()For i = 1 To 10Sheets.AddNextEnd Sub如下图所示,代码是利用循环给Excel新增10个工作表。
4、代码完成后,点击“运行子程序”按钮,如下图所示。
5、返回Excel,就可以看到原表中增加了10个新的空工作表,如下图所示。
时间:2024-10-21 06:31:59
1、打开一个Excel表格,如下图所示。
2、按下Alt+F11,打开VBA编辑界面,点击左上角的额工作表,右侧出现对应的VBA编辑区,如下图所示。
3、编写代码:Sub 鱼木混猪()For i = 1 To 10Sheets.AddNextEnd Sub如下图所示,代码是利用循环给Excel新增10个工作表。
4、代码完成后,点击“运行子程序”按钮,如下图所示。
5、返回Excel,就可以看到原表中增加了10个新的空工作表,如下图所示。