EXCEL 当文件打开后,自动执行宏指令,然后关闭,另存为-----(重点)
EXCEL当文件打开后,自动执行宏指令(录制宏)这里主要就是,东西有个表头,然后就是将另外的一个文件数据导入进来,,对上表头。执行完以后。。。自动另存为“为当前的时间“Y...
EXCEL 当文件打开后,自动执行宏指令(录制宏)这里主要就是,东西有个表头,然后就是将另外的一个文件数据导入进来,,对上表头。执行完以后。。。自动另存为“为当前的时间“YYYY-MM-DD“然后加个名称---保存”然后自动关闭。
展开
1个回答
展开全部
把下面的代码复制放到Thisworkbook中,其它地方没用,
Private Sub Workbook_Open()
Call 要执行的宏 '比如要执行模块1里的"aa" ,改成: 模块1.aa
LongName = ThisWorkbook.Path & "\" & Date & ThisWorkbook.Name
ActiveWorkbook.SaveAs Filename:=LongName, FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
ActiveWorkbook.Close
End Sub
Private Sub Workbook_Open()
Call 要执行的宏 '比如要执行模块1里的"aa" ,改成: 模块1.aa
LongName = ThisWorkbook.Path & "\" & Date & ThisWorkbook.Name
ActiveWorkbook.SaveAs Filename:=LongName, FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
ActiveWorkbook.Close
End Sub
更多追问追答
追问
自动另存为在哪里呢?
追答
在本档的同个目录下,如果不是,请根据实际修改,你问题里没说存在哪里
百事牛
2024-10-22 广告
2024-10-22 广告
百事牛是共享提供商,我们提供可靠有效的服务,适当合理的授权费有利于的继续更新优化。同样的事情,同样的方法,百事牛团队十年磨一剑,始终至聚焦在密码恢复领域,深耕于此,我们已研制出有别于其他公司的算法和运算模式, 百事牛的暴力模式加入了分布式点...
点击进入详情页
本回答由百事牛提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询