『壹』 VBA高手帮帮忙，如何让word2003在文件关闭（或保存）时，后台自动备份文件到指定目录
Private Sub Document_Close()
If Not ThisWorkbook.Saved Then
Answer = MsgBox("是否保存？", vbYesNo + vbDefaultButton2, "你要的效果")
If Answer = vbYes Then ThisWorkbook.Save
End If
End Sub
Document_Close是一个WORD被关闭时执行的事件
第二行，判断是否已经被保存过
第三行，是弹出对话框询问是否要保存
第四行，是当你确认时，就保存
这个事件里的内容，是我用在excel里的。事件，是WORD的。
你自己小改一下就能用