生成时间戳的两种方法


导语: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. 备份文件的加密保护(适用于敏感文档):在保存代码中加入密码保护。具体实现方法参见相关说明。