找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1691|回复: 1
收起左侧

EXCEL文件采用VBA自动备份到其它目录

[复制链接]
ID:1006852 发表于 2022-4-20 17:47 | 显示全部楼层 |阅读模式
我们在工作中经常需要把文件手动复制到其它目录做备份,防止数据文件损坏或丢失。
现在分享一个采用VBA做的自动存盘方法案例。新开一个表格文件。

打开VBA编辑器,选中左边的ThisWorkbook,然后在右图选择Workbook,和AfterSave.
插入以下代码,存盘退出。文件会要求保存为.XLXM格式,且运行时会要求启动宏。
2.png 3.png
指令说明:第一条是获取文件名
第二条是保存备件到指定目录下。文件名相同,目录可以是本地如:D:\。也可以是网络共享盘如:\\电脑名称\D\
本宏指令触发条是每次保存后运行。
这样一来,每次保存文件的同时就会自动备份文件到指定的目录。
1.png
51hei.png

自动保存副本.zip

11.24 KB, 下载次数: 7, 下载积分: 黑币 -5

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

回复

使用道具 举报

ID:1026620 发表于 2022-5-15 00:21 | 显示全部楼层
每次不用同时打开这个文件也可以实现备份吗?
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表