找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2641|回復(fù): 1
打印 上一主題 下一主題
收起左側(cè)

EXCEL文件采用VBA自動備份到其它目錄

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:1006852 發(fā)表于 2022-4-20 17:47 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
我們在工作中經(jīng)常需要把文件手動復(fù)制到其它目錄做備份,防止數(shù)據(jù)文件損壞或丟失。
現(xiàn)在分享一個采用VBA做的自動存盤方法案例。新開一個表格文件。

打開VBA編輯器,選中左邊的ThisWorkbook,然后在右圖選擇Workbook,和AfterSave.
插入以下代碼,存盤退出。文件會要求保存為.XLXM格式,且運行時會要求啟動宏。

指令說明:第一條是獲取文件名
第二條是保存?zhèn)浼街付夸浵�。文件名相同,目錄可以是本地如:D:\。也可以是網(wǎng)絡(luò)共享盤如:\\電腦名稱\D\
本宏指令觸發(fā)條是每次保存后運行。
這樣一來,每次保存文件的同時就會自動備份文件到指定的目錄。

1.png (8.54 KB, 下載次數(shù): 145)

1.png

51hei.png (2.53 KB, 下載次數(shù): 140)

51hei.png

自動保存副本.zip

11.24 KB, 下載次數(shù): 8, 下載積分: 黑幣 -5

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

沙發(fā)
ID:1026620 發(fā)表于 2022-5-15 00:21 | 只看該作者
每次不用同時打開這個文件也可以實現(xiàn)備份嗎?
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表