vba 创建新的word文档，再次运行后报错 80
vba生成一个word文档用来打印,不做不保存，文档关闭后，再次运行此程序，报错，462错误提示：远程服务器不存在或不能使用是不是应该在文档结束时触发一个事件，做些什么释...
vba 生成一个word文档用来打印,不做不保存，文档关闭后，再次运行此程序，报错，462错误提示：远程服务器不存在或不能使用
是不是应该在文档结束时触发一个事件，做些什么释放内存还是开启服务器之类的处理？ 展开
是不是应该在文档结束时触发一个事件，做些什么释放内存还是开启服务器之类的处理？ 展开
1个回答
展开全部
加这个判断试试：
If IsFileOpen(wfile) = False Then
Set WDApp = CreateObject("Word.application")
WDApp.Visible = True
WDApp.Documents.Open wfile
End If
If IsFileOpen(wfile) = True Then
Set WDApp = GetObject(wfile).Application
WDApp.Visible = True
End If
If IsFileOpen(wfile) = False Then
Set WDApp = CreateObject("Word.application")
WDApp.Visible = True
WDApp.Documents.Open wfile
End If
If IsFileOpen(wfile) = True Then
Set WDApp = GetObject(wfile).Application
WDApp.Visible = True
End If
更多追问追答
追问
Isopenfile未定义
追答
哦
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
