在Word应用过程中，经常出现需要Word文件的传输给对方，此时需要在对方收到文件后，指定时间之后，自动清除指定的数据或删除所有内容，保证数据的安全性和时效性。工具/原料more电脑Word方法/步骤1/9分步阅读

打开需要处理的Word文件，如图所示。

2/9

点击组合键“ALT+F11”调用并打开VBA程序界面，如图所示。

3/9

点击左侧“工程栏”中的“This Document”

4/9

点击上侧下拉菜单中的“Document”

5/9

点击上侧下拉菜单中的“Open”

6/9

在Private和End Sub之间，录入程序如下

Dim a, b As String

a = Format(Date, yyyy年m月d日) 当前年月日

If a 2017年9月10日 Then

Selection.WholeStory

Selection.Delete Unit:=wdCharacter, Count:=1

End If

7/9

点击运行，程序无编译错误，即可关闭VBA窗口。

8/9

将WORD文件另存为启用宏的word，关闭Word 。

9/9

打开Word，测试当2017/9/13大于2017/9/10，Word中所有内容成功的自动清除。

注意事项

原创不易，您的投票点赞是我持续分享的最大动力。

WORD定时指定时间清除VBA