怎样使用已经打开的Word文档来新建一个对象然后赋值给一个word对象?

老田低代码 2004-07-28 06:40:41
我已经打开了一个word
我定义了如下的对象
Dim objWord as Word.Application
我的问题是这样的:
希望能够通过这个已经打开的Word文档来直接新建一个文档,然后将这个文档作为对象赋值给objWord,因为这样可以节约从新创建word.application对象的时间。因为我们知道set objword=createobject("word.application")是需要很多时间的。

请大伙帮忙
...全文
107 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
老田低代码 2004-07-29
  • 打赏
  • 举报
回复
非常感谢!
hhjjhjhj 2004-07-28
  • 打赏
  • 举报
回复
Dim objWord as Word.Application
dim objDoc as word.document
on error resume next
set objword=getobject(,"word.application")
if err.nember<>0 then '没有WORD在运行就新运行
set objword=createobject("word.application")
end if
set objDoc=objWord.documents.add

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧