word2003如何在关闭或者保存时后台自动备份到指定文件夹

Question

我水平不高，最好有详细步骤，如果有做好的软件就更好了，急！ 急，帮想想办法，要全自动的

Answer 1

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的。
你自己小改一下就能用