使用VBA代码实现excel文档每天自动备份
发布时间：2023-12-06 23:55:39
不少同学都担心：excel误删除了怎么办？excel损坏了怎么办？…其实如果excel重要的文件如果每天能备份一份，再也不用担心文件丢失和损坏了。本文详细讲述使用VBA代码实现excel文档每天自动备份的方法。
实现这样“高大尚”的功能现有的excel功能无法完成，还得VBA编程的方法。当然，作为不懂VBA代码的你，只需要按下面步骤复制粘贴即可。
第1 步：打开要备份的excel文件，在工作表标签上右键单击，点击“查看代码”。
第2步 在打开一个visualbasic窗口，双击工程窗口中的thisworkbook，把下面的代码粘贴到右侧的窗口中。
代码：
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Dim mypath As String, fname As String
fname = Format(Date, "yymmdd") & ThisWorkbook.Name
mypath = ThisWorkbook.Path & "/备份/"
ThisWorkbook.SaveCopyAs mypath & fname
End Sub
第3步：在Visual basic窗口中点击保存命令，会弹出另存启用宏的提示，这时点击“否”按钮。
在弹出的保存窗口中，选取保存类型为“Excel 启用宏的工作簿”。
第4步：在当前文件夹中，新建一个名为“备份”的文件夹。
设置完成。
当关闭当前文件后，在备份文件夹中会自动产生一个 日期 + 文件名的excel备份文件。
当第2天再次关闭文件时，同样会再产生一个当天的备份文件。
注意：
1、以后使用的文件应是xlsm格式的文件。
2、当打开文件时，如果提示“启用内容”就点击启用。
补充：excel由于支持强大的vba开发语言，使得只要我们能想到的功能，都可以用它来实现。如果你想成为Excel高手，建议学习VBA编程。
0
投稿猜你喜欢
Win10重装系统之后不能联网？当我们的电脑出现了问题时，有用户会直接通过重装系统的方法来解决，但是近期有用户遇到了重装系统之后电脑无法联网- 每次重装Windows8因为开发需要.Net 3.5 Framework每次都要漫长的等待才能安装成功，其实可以不需要联网安装的，下面有个不
- 最终完成效果如下： ，其中A列是之前排过序的项目数据源所在列， MATCH(C2*，，C2*) 这部分公式在A列中统计以C2当中字符打头的项
- 表亲们好啊，年底到了，又到了抓耳挠腮写总结的时候。今天和大家来分享一个写总结时经常用到的Excel图表技巧，话不多说，看图：A:B列是1~1
- excel2016饼形图怎么分离饼块？excel2016图标中制作一个饼形图，想要分离饼形图的饼块，该怎么实现呢？下面我们就来看看详细的教程
- Windows11 22581.1是微软今天最新发布的预览版，这个版本将beta渠道和Dev渠道版本整合一起了，很多用户想第一时间去体验一下
- 大家都知道Mac上有一款很好用自带浏览器，那就是Safari for Mac，这款浏览器具备新建标签页面、标签管理、地址栏搜索、书签同步、私
- 魔兽大脚插件非常的好用，但是很多小伙伴不知道怎么安装， 其实安装插件版的非常方便，也有绿色包安装的，下面来看看详细的安装教程吧。【魔兽大脚插
- ppt怎么手绘简笔画效果的地球仪？ppt中想要绘制一个地球仪，该怎么绘制地球仪呢？下面我们就来看看ppt地球仪的画法，需要的朋友可以参考下P
- Excel中的sumif函数具体该如何进行操作和使用呢?接下来是小编为大家带来的excel中sumif函数使用教程，供大家参考。excel中
- WPS表格打印如何将内容打印在一页操作分享。在进行表格内容打印的时候，很多的用户都有遇到一个问题，就是自己编辑的表格内容比较多，在打印的时候
- win10字体文件夹名称乱码怎么办？最近有很多win10用户反映在打开字体文件夹的时候发现文件夹的名称变成了乱码给操作带来了麻烦，那么该怎么
- 如何看待笔记本电池的健康状况？特别是在新安装的win10系统中，如何检查笔记本电脑的电池状态？ 事实上，只需几个简单的命令即可获得所有内容。
- 1：“视图”，打开你要新建的文件，再打开“新建窗口” 2：这里就可以看到两个文件，注意他们的名称。
- 在Win10系统中有一个自带的杀毒软件，这个杀毒软件的杀毒能力随着微软的不断研发也不断增强，那么Win10自带的杀毒软件要如何开启或关闭呢？
- GA报表除了默认的表格方式显示数据外，还支持饼图，水平百分比图，数据透视图等展现方式，其中水平百分比图在可视化看流量时最为方便GA报表除了默
- 现在我们就来了解一下关于Excel表格里时间如何相加的问题来做一下了解。第一步:打开Excel软件，计算几次测试一下总用时，然后点击B4单元
- Win10玩命运2头晕怎么办？很多的用户们在电脑上玩耍游戏命运2的时候，出现了头晕、恶心的问题，这种的问题导致很多用户们没办法去很好的体验游
- 我们在使用Win10系统的电脑搜索文件时，难免会遇到Windows找不到文件的问题，那么这个时候我们应该要怎么去解决呢？下面就和小编一起来看
- Win10 10565预览版怎么设置窗口缩放自适应？win10 9926预览版中就已经可以使用窗口自适应功能了，在最新的Windows10预
