Office) (CommandBar.Protection 属性

获取或设置一个 msoBarProtection 常量，该常量表示保护命令栏免受用户自定义的影响。 读/写。

注意

某些 Microsoft Office 应用程序中对 CommandBars 的使用已由 Microsoft Office Fluent 用户界面的新功能区组件取代。 有关详细信息，请参阅 Office Fluent 功能区概述。

语法

表达式。保护

表达式 表示 命令栏 对象的变量。

备注

使用常量 msoBarNoCustomize 可防止用户访问“添加或删除按钮”菜单（此菜单项允许用户自定义工具栏）。

示例

此示例逐步浏览命令栏集合，以查找名为 Forms 的命令栏。 如果找到此命令栏，则其停靠状态将受到保护，并且该命令栏将变为可见。

foundFlag =  False 
For i = 1 To CommandBars.Count 
    If CommandBars(i).Name = "Forms" Then 
            CommandBars(i).Protection = msoBarNoChangeDock 
            CommandBars(i).Visible = True  
            foundFlag = True  
    End If 
Next 
If Not foundFlag Then 
    MsgBox "'Forms' command bar is not in the collection." 
End If

另请参阅

• CommandBar 对象成员

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。