一、excel新建工作表并重命名
Sub test()
Dim i As Variant
Dim j As Integer
Dim sht As Worksheet
i = Array("桃花河大桥", "新房子中桥", "新城坝中桥", "新城坝1#大桥", "新城坝2#大桥", "大河沟大桥", "沙田河大桥", "洞明村大桥", "磨湾山右线中桥", "磨湾山大桥", "麻柳井大桥", "黄泥田大桥", "刘家湾大桥", "石牛坝大桥", "华头嘴大桥", "陈深沟大桥", "梓江大桥", "金华互通匝道桥")
For j = 1 To 3
Worksheets(j).Name = i(j - 1)
Next
For j = 4 To 18
Set sht = Worksheets.Add(after:=Worksheets(j - 1))
sht.Name = i(j - 1)
Next
End Sub
二、excel怎么将工作表格命名
Excel怎么将工作表格命名？在使用excel表处理材料时，为了避免内容的混淆，我们可以给工作表重新命名，这里介绍三种方法。
工具原料excel表格电脑
方法/步骤分步阅读
1
/3
如图打开excel表格，找到我们需要重新命名的工作表。
2
/3
右击该工作表，在弹出的选项内点击选择“重命名”。
3
/3
工作表的默认名称变成如图所示的蓝色样子。输入我们自己需要的名称，例如一年级，完成输入后在空白处单击鼠标。
方法/步骤2
1
/1
找到我们需要重命名的工作表，在工作表默认名字上双击，默认名字变成蓝色，输入我们的新名字。
方法/步骤3
1
/2
找到我们需要重命名的工作表，单击该工作表，然后点击菜单栏的“开始”选项，如箭头所示，点击“工作表”选项--点击“重命名”
2
/2
工作表的默认名称变成蓝色可改写状态，编辑我们新命名。空白处单击，完成重命名。
