避免看到“限制编辑”侧边栏 - MS WORD

Question

我创建了一个模板，然后将编辑限制在特定区域。

我添加了一个简单的宏以避免看到黄色突出显示

ActiveWindow.View.ShadeEditableRanges = False

现在我想避免当用户尝试修改受限区域时，会出现“受限编辑”侧栏。

我录制了一个宏来查看 VBA 读取的指令，但是没有打开侧边栏的命令...

您认为有没有办法避免出现侧边栏？ 如果我在 excel 中，我会考虑类似的事情：

 Private Sub RestricEditing_Change(ByVal Target As Range)
' Determine whether the change is in the restricted editing area
   Set checkRange = Application.Intersect(Target, restricted area)

' If the change wasn't in this range then we're done
   If checkRange Is Nothing Then Exit Sub
   Else "do not show the restricted editing sidebar"

在此先感谢大家！

Answer 1

当我使用以下内容时，任务窗格似乎对用户“禁用”。 它仍然可以通过功能区的“开发人员”选项卡中的“限制编辑”按钮显示：

Application.Taskpanes(wdTaskPaneDocumentProtection).Visible = False

要在打开文档时“禁用”此窗格，我不得不采取一些技巧 - 有问题的窗格将暂时可见。 这假设文档的开头不应该是可编辑的。 SendKeys将触发窗格； 在计时器上调用禁用。

Sub AutoOpen()
    Application.ScreenUpdating = False
    ActiveWindow.View.ShadeEditableRanges = False
    SendKeys "T"
    DoEvents
    Application.OnTime Now + TimeValue("00:00:01"), "DisableProtectionPane"
End Sub

Sub DisableProtectionPane()
    Application.TaskPanes(wdTaskPaneDocumentProtection).Visible = False
End Sub

我注意到

• 当用户通过单击右上角的“x”关闭任务窗格时，行为与使用上述代码相同。
• 当文档关闭并再次打开时，此设置和突出显示的设置都将重置为默认值。
• 使用Application.Taskpanes(wdTaskPaneDocumentProtection).Visible = true不一定会在 Word 会话期间重置行为。