如果禁用了工具栏的自定义,则返回 True。Boolean 类型,可读写。
expression.DisableCustomize
expression 必需。该表达式返回“应用于”列表中的对象之一。
本示例翻转 DisableCustomize 属性。
Sub ToggleCustomize()
With Application.CommandBars
If .DisableCustomize = True Then
.DisableCustomize = False
Else
.DisableCustomize = True
End If
End With
End Sub