全部显示

Reset 方法

       

将指定的内置命令栏重置为默认的配置,或将指定的内置命令栏控件重置为其初始的函数和图符。

expression.Reset

expression   必需。该表达式返回一个 CommandBarCommandBarControlCommandBarButtonCommandBarPopupCommandBarComboBox 对象。

说明

重置一个内置控件将恢复该控件原来对应的动作,并将各属性恢复成初始状态。重置一个内置命令栏将删除其中的自定义控件并恢复其内置控件。

示例

本示例可实现的功能为:根据用户级别用 user 的值调整命令栏。如果 user 为“Level 1”,那么显示命令栏“Custom”。如果 user 为任何其他值,那么内置的 Visual Basic 命令栏被重新设置为默认状态并且命令栏“Custom”无效。

Set myBar = CommandBars("Custom")
If user = "Level 1" Then
    myBar.Visible = True
Else
    CommandBars("Visual Basic").Reset
    myBar.Enabled = False
End If