查看: 1862|回复: 5
如何在另存为csv文件时同时重命名里面的sheetname
新鲜人, 积分 4, 距离下一级还需 6 积分
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次
免费注册成为本站会员，享用更多功能，结识更多Office办公高手！
才可以下载或查看，没有帐号？
本帖最后由 学点东东 于
17:45 编辑
请问如何在另存为csv文件时同时重命名里面的sheetname，sheetname=k
请教，谢谢！
Dim n As String
& & n = Sheets(&任务&).[B42].Text
& & k = Sheets(&任务&).[D4].Text & Sheets(&任务&).[A4].Text
& & Sheets(&Sample&).Select
& & ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & &\& & n & &.csv&, FileFormat:=xlCSV
& & MsgBox (&Sample&&csv文件生成完毕**！&)
现在情况是，生成的csv文件的文件名字是n，里面sheet的名字也是n，要是改成k的话就都是k，怎么才能实现，文件名是n，里面sheet名字是k。
学office，哪能不关注全网最大的Office类微博（新浪）
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次管理次数 次
CSV本质上就是文本文件，保存后就是文本文件，工作表名称等信息一概丢失，只会记录下第一张工作表中的数据。
学office，哪能不关注全网最大的Office类微博（新浪）
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次管理次数 次
一个表用worksheets(&任务&).copy
with activeworkbook
&&.activesheet.name=k
&&.SaveAs Filename:=ThisWorkbook.Path & &\& & n & &.csv&, FileFormat:=xlCSV
&&.close false
end with复制代码多个表用worksheets.copy复制代码然后在activeworkbook里循环各个表进行操作
学office，哪能不关注全网最大的Office类微博（新浪）
新鲜人, 积分 4, 距离下一级还需 6 积分
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次
kevinchengcw 发表于
一个表用多个表用然后在activeworkbook里循环各个表进行操作
不好意思，刚刚没有写清楚，我要保存的sheet是“Sample ”这一个表为csv文件，并把里面的sheet名字定为k，谢谢
学office，哪能不关注全网最大的Office类微博（新浪）
新鲜人, 积分 4, 距离下一级还需 6 积分
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次
amulee 发表于
CSV本质上就是文本文件，保存后就是文本文件，工作表名称等信息一概丢失，只会记录下第一张工作表中的数据。 ...
不好意思，刚刚没有写清楚，我要保存的sheet是“Sample ”这一个表为csv文件，并把里面的sheet名字定为k，谢谢
学office，哪能不关注全网最大的Office类微博（新浪）
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次管理次数 次
表名自己改一下就行了，另外注意2楼的说明
学office，哪能不关注全网最大的Office类微博（新浪）
Excel技巧网的会员探讨问题仅代表其个人意见，与网站的立场无关。任何违反国家和地方相关法律法规的言论，本站有义务协助政府相关部门追究发言者的责任！
本站中非注明转载文章与案例的版权为作者与Excel技巧网共有。若非原文作者，本站之外任何单位或个人未经允许，不得将其用于商业用途。
若非原文作者，任何形式的非商业性转载必须获得Excel技巧网或作者允许，并注明作者和出处。
会员发表的帖子如涉及版权纠纷，须自行负责。详情请参考注册时的网站服务条款。
本站特聘法律顾问：沈学律师
Powered by在EXCEL，要重命名，会显示改变文件扩展名会导致文件不可用，要怎么弄，才可以重命名。帮帮我，谢谢！_百度知道登录龙源账号
1.点击网站首页右上角的“充值”按钮可以为您的帐号充值
2.可选50.100或500的充值金额，充值后按篇按本计费
3.充值成功后即可购买网站上的任意文章或杂志的电子版
4.购买后文章可打印，杂志可在个人中心的订阅/零买找到
5.登陆后可阅读免费专区的精彩内容
巧用Excel给文件批量重命名
打开文本图片集
很多时候我们会遇到要给文件重新命名的情况。重命名几个文件并不难，难就难在如果重命名的文件有几百甚至几千个，如果手动操作的话，那么这其中所花费的时间就可想而知了。同时，在手动操作过程中也非常容易发生误操作。那么有没有更简单、直接的方法呢?笔者在工作中遇到这样的情况，高二年级的学生在学业水平测试报名时拍摄的电子照片是用“考籍号”命名的，照片格式是JPG，文件名即“考籍号JPG”。（剩余621字）
（ &&&欢迎：，，）
畅销排行榜
中小学电教 2012年01期
中小学电教 2010年08期
中小学电教 2013年06期
中小学电教 2014年06期
中小学电教 2015年03期
中小学电教 2012年01期
中小学电教 2008年12期
中小学电教 2009年04期
中小学电教 2011年05期
中小学电教 2012年07期
邮箱/用户名
还没有龙源账户？excel重命名后格式改变怎么恢复原来格式_百度知道excel中给工作表重命名时加符号例如对号_百度知道}