我会定期查看我的Word目录中的文件，以确定是否可以安全删除任何旧文档。很多时候，我需要打开文件进行检查，然后才能确定是否应删除该文件。

当然，Word将允许您删除“打开”或“保存”对话框中列出的文件，但不会删除活动文档-当前打开的文档。而不是关闭活动文档，然后通过打开“打开”或“保存”对话框将其删除，我使用以下宏删除已打开的文件。

Sub DeleteThisFile()

Dim MyFile As String

MyFile = ActiveDocument.Path & "\" & ActiveDocument.Name     If MsgBox(MyFile & " will be deleted permanently", _       vbYesNo, "Delete this File?") = vbYes Then         ActiveDocument.Close (wdDoNotSaveChanges)

Kill MyFile     End If End Sub

宏会提示您确保要删除文件，并且（如果这样做）它将关闭文档而不保存，然后将其删除。

您应注意，该文件不会转到回收站，但会立即删除。

注意：

如果您想知道如何使用此页面（或_WordTips_网站上的任何其他页面）中描述的宏，我准备了一个包含有用信息的特殊页面。

点击此处在新的浏览器标签中打开该特殊页面。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

（Microsoft Word是世界上最流行的文字处理软件。）本技巧（1346）适用于Microsoft Word 97、2000、2002和2003。您可以在Word（Word 2007）的功能区界面中找到此技巧的版本。和更高版本）在这里：

删除打开的文档文件。