Question

excel批量插入工作表并批量命名

如何在excel中批量插入工作表并批量命名，比如在一张excel表格中插入30个工作表，并批量命名为1月1日、1月2日、1月3日……1月30日。

Answer 1

在visual basic编辑器中插入一个模块，把以下代码粘进去，运行就可以了。
Sub Macro1()
a = Sheets.Count
For i = a + 1 To a + 30
Sheets.Add After:=Sheets(Sheets.Count)
'Sheets("Sheet4").Select
Sheets(i).Name = "1月" & i - a & "日"
Next
End Sub

Answer 2

用VBA,做吧.