EXCEL中VBA编程

来源:百度知道 编辑:UC知道 时间:2024/05/25 09:33:13
将名字为“2.doc"的文件 另存为名字为"3.doc"的文件。利用VBA实现
Set wrd = CreateObject("word.application")
wrd.documents("2.doc").SaveAs Filename:="3.doc"
2.doc已经打开,以上语句有什么错误?

2.doc已经打开了,只用:ActiveDocument.SaveAs FileName:="Doc3.doc",就完全可以了。

加一句这个代码
On error resuem next

或者:用代码先关闭2.doc文件,在保存。

有错,完全错误,不能给已经打开或者只读的文件改名的。就是你在windows地下操作也是不允许的,更何况vba,vba只是用代码完成你的一些错做而已。