Excel 如何批量复制工作表并重命名
3个回答
展开全部
可以尝试使用excel文件合并拆分能手 4.8版，自动将多个工作簿或工作表合并，可以达到你想要的复制效果。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
将
'1月1日
粘贴至第一个表的a1单元格（原表a列有数据可插入一列），将其向下拖，如图：
按＂alt"+"f11＂键--＞＂插入＂--＞＂模块＂，将下面代码复制后粘贴过去：
sub
返回工作表名()
for
i
=
1
to
sheets.count
sheets(i).name
=
range("a"
&
i)
next
end
sub
如图：
--＞按＂f5＂键运行后返回，如图：
'1月1日
粘贴至第一个表的a1单元格（原表a列有数据可插入一列），将其向下拖，如图：
按＂alt"+"f11＂键--＞＂插入＂--＞＂模块＂，将下面代码复制后粘贴过去：
sub
返回工作表名()
for
i
=
1
to
sheets.count
sheets(i).name
=
range("a"
&
i)
next
end
sub
如图：
--＞按＂f5＂键运行后返回，如图：
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
需要VBA代码来实现
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
