Mostrar todo

Propiedad BuiltIn

True si la barra de comandos o el control de barra de comandos especificado es una barra de comandos o control integrados de la aplicación contenedora. False si se trata de una barra de comandos o control personalizados, o si se trata de un control integrado cuya propiedad OnAction ha sido establecida. Boolean de sólo lectura.

Ejemplo

Este ejemplo elimina todas las barras de comandos personalizadas no visibles.

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