要在最后一张工作表后插入一张新工作表，并将新工作表命名为“ExcelHome”，过程可以写为：

Sub ShtAdd()
Worksheets.Add after:=Worksheets(Worksheets.Count)
ActiveSheet.Name = "ExcelHome"
End Sub

上一篇：excel宏教程：用VBA按列信息拆分数据到多张工作表 下一篇：excel表格制作教程：用VBA修改Excel的程序界面（一）

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。