1、在Excel中利用VBA生成12个工作表,并依次命名为1月-12月,并且12月的工作表放到最前面。
2、在Excel中按下Alt+F11,打开VBA编辑界面,如下图所示:
3、输入代码,如下图所示:Sub 鱼木混猪()For i = 1 To 12掳姗浚瑙Worksheets.Add after:=Worksheets(Worksheets.Count)ActiveSheet.Name = i & "月"Next iWorksheets("12月").Move before:=Worksheets(1)End Sub
4、点击“运行代码”按钮,如下图所示:
5、关闭VBA编辑界面,返回Excel中,就可以看到结果如下图所示: