全部显示

Protection 属性

本主题中的某些内容可能不适用于某些语言。

返回或设置指定命令栏的保护方式，以防止用户改动。 MsoBarProtection 类型，可读写。

说明

用常量 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