读书人

vb怎么后台操作word2007新建,另存

发布时间: 2012-03-16 16:34:56 作者: rapoo

vb如何后台操作word2007新建,另存
在word2003下使用没有问题,操作2007就出问题了!
Dim WordApp As Word.Application
Dim WordDoc As Word.Document

Set WordApp = CreateObject( "Word.Application ")
Set WordDoc = WordApp.Documents.Open(App.Path & "\DOC\模版.doc ")

With WordApp
.Visible = False
' .Activate
End With

With WordApp
.Visible = False
' .Activate
.........



With WordDoc


End With


WordDoc.SaveAs ( "c:\doc.doc ")
WordDoc.Close


WordApp.Quit
Set WordDoc = Nothing
Set WordApp = Nothing

[解决办法]
那你引用那里换了吗?
有没有把引用word2003改成word2007?
如果改的话,应该不会出什么问题的

为了避免这样的情况
最好是用createobject来创建对象
这样就不会因为版本不一样而发生错误
并且也不用引用对象
打包的程序也小很多~~~~~
[解决办法]
也遇到类似的问题,客户的Office可能是2000;xp;2003等,怎么样才能是程序自动识别(直接引用有问题)

To datou985:
如何用createobject来创建对象?

读书人网 >VB

热点推荐