大家好，今天跟大家分享如何利用vba代码在Excel工作簿中快速新建12个月份的工作表标签。
应用案例在下面图1所示的Excel工作簿“工作簿1”中已有一张空白工作表“sheet1”，下面我们利用vba代码快速批量新建11张工作表，使工作簿中一共存在12张工作表，并分别以12个月份命名工作表标签，如“1月”“2月”……“12月”，参考效果见图2。
图1
图2
操作步骤1 打开Excel工作簿“工作簿1”，在“开发工具”选项卡“代码”功能组中单击“Visual Basic”按钮。
2 在弹出的VBA编辑器窗口中，单击“插入”按钮，在弹出的菜单中选择“模板”选项，此时，窗口中会新增一个“工作簿1-模块1（代码）”窗口。
3 在“工作簿1-模块1（代码）”窗口中输入如下代码：
Sub test1()
Dim i As Integer
Sheets.Add Count:=11
For i = 1 To 12
Sheets(i).Name = i & "月"
Next
End Sub
4 单击窗口上方的“运行子过程/用户窗体”按钮（方向向右的绿色三角符号）运行代码。
5 此时，可见“工作簿1”中已批量生成了以12个月份命名的12张工作表。
今天的分享就到这里，感谢阅读，欢迎关注，一起学习更多职场办公技能！#职场##职场技能##office办公技能##职场excel小技巧#
,
