首页 > 解决方案 > 防止word doc以只读方式打开,编译错误

问题描述

我正在使用一个 Excel 模型,该模型从网站中提取一个 word 文档并将其打开,并且我正在尝试插入一行代码以确保该文档不会以只读视图打开。具体来说,当用户选中“在阅读视图中打开电子邮件附件和其他不可编辑的文件”时会发生错误,当您单击 word 文档上的文件 -> 选项时会出现该错误。因此,我试图确保在打开 word doc 时未选中此框。我做了一些研究,“ActiveWindow.View.ReadingLayout = False”行似乎应该可以工作,但是我收到一条错误消息,上面写着“编译错误:无效的限定符”,突出显示了我刚刚添加的行。其余的代码不是我写的,不能更改。有什么办法可以做到这一点吗?这是代码的片段。

Dim objWord
Dim objDoc

Set objWord = CreateObject("Word.Application")

Set objDoc = objWord.Documents.Open("https://WebsiteRedacted")
'Opens up the template

objWord.Visible = True

ActiveWindow.View.readinglaout = False
'The line I added in

标签: vbams-word

解决方案


推荐阅读