excel中如何按特定名称快速建立工作表。
excel中如何按特定名称快速建立工作表,比如手头有一份名单,需要将工作表的名字改为名单中的人名,张三,李四,王五等等。需要建立的表太多,一个个建太麻烦。求助~~~...
excel中如何按特定名称快速建立工作表,比如手头有一份名单,需要将工作表的名字改为名单中的人名,张三,李四,王五等等。需要建立的表太多,一个个建太麻烦。求助~~~
展开
3个回答
展开全部
假如你有6个表
表名放在第一表的A1到A6,用下VBA
Sub b()
Dim i As Integer
For i = 1 To 6
Sheets(i).Name = Sheets(1).Cells(i, 1).Text
Next
End Sub
这样就可以批量改表名了
表名放在第一表的A1到A6,用下VBA
Sub b()
Dim i As Integer
For i = 1 To 6
Sheets(i).Name = Sheets(1).Cells(i, 1).Text
Next
End Sub
这样就可以批量改表名了
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
先弄个宏,再把里面的内容删了,换成下面的语句
Sheets(1).Select
For a = 1 To 20
Sheets.Add after:=Sheets(a)
Sheets(a + 1).Name = Sheets(1).Cells(a, 1)
看不懂+Q:413173184
Sheets(1).Select
For a = 1 To 20
Sheets.Add after:=Sheets(a)
Sheets(a + 1).Name = Sheets(1).Cells(a, 1)
看不懂+Q:413173184
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询