EXCEL VBA的SAVEAS问题
答案:2 悬赏:60 手机版
解决时间 2021-03-20 19:23
- 提问者网友:杀生予夺
- 2021-03-20 06:10
EXCEL VBA的SAVEAS问题
最佳答案
- 五星知识达人网友:酒醒三更
- 2021-03-20 07:38
Saveas 是把当前文件另存为另一个文件,所以"当前"文件就变成目标文件了,想要做一个备份,而真正的保留当前文件,请使用 SaveCopyAs,这样才可以达到楼主的目的...
即:
把 ThisWorkbook.SaveAs ("d:\temp\temp全省站点名单1.xls") 改为:
ThisWorkbook.SaveCopyAs ("d:\temp\temp全省站点名单1.xls")
即:
把 ThisWorkbook.SaveAs ("d:\temp\temp全省站点名单1.xls") 改为:
ThisWorkbook.SaveCopyAs ("d:\temp\temp全省站点名单1.xls")
全部回答
- 1楼网友:何以畏孤独
- 2021-03-20 08:58
Workbooks(ylj & "\站点名单1.xls").Activate
改为:Workbooks("站点名单1.xls").Activate追问先感谢一下你这么快的回答,改动完执行是没出错,但是站点名单1.xls仍没激活,MsgBox ThisWorkbook.FullName执行完仍显示d:\temp\temp全省站点名单1.xls,之后执行的一切操作仍在这个文件里执行,我的宏在站点名单1.xls里,想操作的也是站点名单1.xls,请指教!追答如果你saveas 后不想让目标转为saveas后的目标那么你设置createbackup参数为true即可
ThisWorkbook.SaveAs "d:\temp\temp全省站点名单1.xls", CreateBackup:=True追问CreateBackup:=True仍然不行,只会在文件夹里多一个temp全省站点名单1的备份.xlk的备份文件,仍然没法转回宏所在工作簿
改为:Workbooks("站点名单1.xls").Activate追问先感谢一下你这么快的回答,改动完执行是没出错,但是站点名单1.xls仍没激活,MsgBox ThisWorkbook.FullName执行完仍显示d:\temp\temp全省站点名单1.xls,之后执行的一切操作仍在这个文件里执行,我的宏在站点名单1.xls里,想操作的也是站点名单1.xls,请指教!追答如果你saveas 后不想让目标转为saveas后的目标那么你设置createbackup参数为true即可
ThisWorkbook.SaveAs "d:\temp\temp全省站点名单1.xls", CreateBackup:=True追问CreateBackup:=True仍然不行,只会在文件夹里多一个temp全省站点名单1的备份.xlk的备份文件,仍然没法转回宏所在工作簿
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯