0

为什么"Error 6124: You are not allowed to edit this section because it is protected."在某些机器上运行此代码时会收到错误消息？我没有在我的开发机器上得到它。书签与表单域相关联。

Set objWordApp = CreateObject("Word.Application")
Set oDoc = objWordApp.Documents.Open(strDocPath)
oDoc.bookmarks("CustomerName").Select
objWordApp.selection = "Mr Smith"
oDoc.bookmarks("CustomerNumber").Select
objWordApp.selection = "0001"
oDoc.save
oDoc.Bookmarks("Comments").Select
oDoc.ActiveWindow.View = 1
objWordApp.WindowState = 0
objWordApp.Visible = True
oDoc.Activate
objWordApp.Activate
4

4 回答 4

0

在受保护/受限制的文档中，您需要参考.FormFields而不是.Bookmarks.

代替：

oDoc.Bookmarks("CustomerName").Select
objWordApp.selection = "Mr Smith"

利用：

oDoc.FormFields("CustomerName").Result = "Mr Smith"
于 2013-11-03T03:16:16.873 回答
0

我和原始海报有同样的问题。一位用户收到 6124 错误，而其他用户没有。我尝试了上面的建议，但没有解决问题。对我有用的是使用这篇MS 文章中的快速修复将 Word 重置为其原始设置。

希望它可以帮助别人！

于 2019-12-03T13:14:47.783 回答
0

我有同样的错误。花了一段时间才弄清楚，但文件权限（在 Windows 中）设置为只读。

在 Windows 资源管理器中，右键单击文件并选择属性。然后取消选中常规选项卡上的只读复选框。

于 2016-03-08T20:59:02.513 回答
0

打开有问题的文档。转到文件->选项->常规。取消勾选“在阅读视图中打开电子邮件附件和其他不可编辑的文件”

http://answers.microsoft.com/en-us/office/forum/office_2013_release-word/run-time-error-4605-in-word-2013-no-information/1ca02c04-5cea-484e-bd23-f4d18183c1b2?授权=1

于 2016-01-19T03:14:13.967 回答