热门标签 | HotTags
当前位置:  开发笔记 > 编程语言 > 正文

VBScript,在编辑模式下打开只读文档-Word2013

如何解决《VBScript,在编辑模式下打开只读文档-Word2013》经验,为你挑选了1个好方法。

我一直在努力寻找一种方法来打开普通/编辑模式下的只读文档,而不是使用MS Word 2013打开读取模式.默认情况下,Word 2013启用"启动电子邮件附件和其他不可编辑的文件"的启动选项在阅读视图".

在打开文档时,如何禁用此选项或将视图从"读取"更改为"正常"/"编辑"视图.(我需要将文档保持为只读,因为它可能会被多个人一次访问)

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(documentPath,,True)
objWord.ActiveWindow.ActivePane.View.Type = wdNormalView

我尝试使用上面的方法设置视图模式,但收到了如下所示的错误代码.我查看了第3行的其他变体但无法使其工作.我还在努力学习Vbscript,所以我假设我没有以正确的方式做这件事.

Error: One of the values passed to this method or property is out of range
Code: 800A16D3
Source: Microsoft Word

谢谢.



1> Dave..:

你正在使用Vbscript- 它不明白是什么wdNormalView意思.这是内部值VBA.您需要找到为此常量保持的实际值并将其应用于此.常量是WdViewType,值如下:

Name          Value    Description
wdMasterView    5      A master view.
wdNormalView    1      A normal view.
wdOutlineView   2      An outline view.
wdPrintPreview  4      A print preview view.
wdPrintView     3      A print view.
wdReadingView   7      A reading view.
wdWebView       6      A Web view.

因此,您要选择的选项是1.尝试以下代码,看看是否有效:

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(documentPath,,True)
objWord.ActiveWindow.ActivePane.View.Type = 1


推荐阅读
author-avatar
CC2502916775_645
这个家伙很懒,什么也没留下!
PHP1.CN | 中国最专业的PHP中文社区 | DevBox开发工具箱 | json解析格式化 |PHP资讯 | PHP教程 | 数据库技术 | 服务器技术 | 前端开发技术 | PHP框架 | 开发工具 | 在线工具
Copyright © 1998 - 2020 PHP1.CN. All Rights Reserved | 京公网安备 11010802041100号 | 京ICP备19059560号-4 | PHP1.CN 第一PHP社区 版权所有