1、启用宏。文件-选项-信任中心-信任中心设置-宏设置
2、修改文件类型为支持宏的文件类型。如XLSM，XLSB。大家可以新建一个文件在另存为选择保存类型。本文以“示例.xlsb”为例。
3、打开代码编辑窗口。按住Alt+F11，然后点击Microsoftexcel对象下的Thisworkbook
4、拷入程序代码：（本文以备份在"D:\Onedrive\BACKUP\&孥恶膈茯quot;为例，大家可以相应的更改为自己需要的）Pr足毂忍珩ivate Sub Workbook_Open()Dim FileName As StringWith ThisWorkbookFileName = Left(.Name, InStrRev(.Name, ".") - 1) & "_" & Format(Date, "YYYYMMDD") & Right(.Name, Len(.Name) - InStrRev(.Name, ".") + 1)End WithIf Dir("D:\Onedrive\BACKUP\" & FileName) = "" Then ThisWorkbook.SaveCopyAs "D:\Onedrive\BACKUP\" & FileNameEnd IfEnd Sub
5、大功告成。文件会在每天打开时自动备份一次了，并且会以日期作为后缀名。
