目录

Reset 方法

优质
小牛编辑
126浏览
2023-12-01

全部显示

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

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