全部显示

BuiltIn 属性

如果指定的命令栏或命令栏控件是容器应用程序的内置命令栏或控件，则返回 True。如果是自定义命令栏或控件或是已设置了 OnAction 属性的内置控件，则返回 False。Boolean 类型，只读。

示例

本示例可实现的功能为：删除所有未显示于屏幕上的自定义命令栏。

foundFlag = False
deletedBars = 0
For Each bar In CommandBars
    If (bar.BuiltIn = False) And (bar.Visible = False) Then
        bar.Delete
        foundFlag = True
        deletedBars = deletedBars + 1
    End If
Next
If Not foundFlag Then
    MsgBox "No command bars have been deleted."
Else
    MsgBox deletedBars & " custom command bar(s) deleted."
End If