Sub Autoclose()
FileCopy "C:\Documents and Settings\Administrator\Application Data\Microsoft\Templates\Normal.dot", "D:\备份\ Normal.dot"
End Sub
路径与文件都存在，就是报：
错误 70 ，拒绝的权限。
如何修改以实现备份这个c盘的normal.dot ,如果D盘中的“备份”文件夹有文件要求复制时覆盖。
我想在关闭文档时用word vba 宏（autoclose）来备份。
而不是其他方法
我晕
是filecopy命令的原因，你用外部dos命令试试，文件名要改成dos支持的8.3格式，尽量不要中文，如下：
Sub Autoclose()
Shell "xcopy C:\Docume~1\Admini~1\Applic~1\Micros~1\Templa~1\Normal.dot e:\*.* /h /y"
End Sub
是filecopy命令的原因，你用外部dos命令试试，文件名要改成dos支持的8.3格式，尽量不要中文，如下：
Sub Autoclose()
Shell "xcopy C:\Docume~1\Admini~1\Applic~1\Micros~1\Templa~1\Normal.dot e:\*.* /h /y"
End Sub
温馨提示：答案为网友推荐，仅供参考
