生成时间戳的两种方法
导语:Word中的秘密“后悔”——你可能从未发现的宝藏功能!
一、直击痛点:为何常规保存操作存在隐患?
该功能特点:
✅ 每次按下Ctrl+S时自动创建独立备份文件;
✅ 文件名附加精确到秒的时间戳(例如 文档_20240620-153021.docx);
✅ 支持本地及云盘双路径存储。
二、三步开启“防丢稿模式”
步骤一:插入自动备份代码(无需编程基础)
打开Word文档 → 按下Alt+F11打开VBA编辑器。在左侧列表找到并点击【ThisDocument】,然后粘贴以下代码:
Private Sub Document_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
On Error Resume Next
Dim backupPath As String
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FolderExists(backupPath) Then fso.CreateFolder backupPath
Dim timeStamp As String
timeStamp = Format(Now(), "yyyyMMdd-hhmmss")
End Sub
步骤二:自定义存储策略
本地路径示例:C:\Users\你的用户名\Documents\Backup\
云同步路径示例:C:\Users\你的用户名\OneDrive\文档备份\
步骤三:启用宏权限
依次点击【文件】、【选项】、【信任中心】、【信任中心设置】,选择【启用所有宏】,并确定保存设置。
三、高级管理方案
1. 自动清理30天前的备份文件,节省存储空间:在代码中添加一段用于删除过期备份文件的代码片段。
2. 备份文件的加密保护(适用于敏感文档):在保存代码中加入密码保护。具体实现方法参见相关说明。