Compartilhar via


Propriedade CommandBar.BuiltIn (Office)

Obtém True se a barra de comandos especificada é uma barra de comandos interna do aplicativo contêiner. Retorna False se for uma barra de comandos personalizada. Somente leitura.

Observação

[!OBSERVAçãO] O uso de CommandBars em alguns aplicativos do Microsoft Office foi substituído pelo novo componente da faixa de opções da interface de usuário do Microsoft Office Fluent. Para obter mais informações, consulte Visão geral da faixa de opções fluente do Office.

Sintaxe

expressão. Builtin

Expressão Uma variável que representa um objeto CommandBar .

Valor de retorno

Booliano

Exemplo

Este exemplo exclui todas as barras de comandos personalizadas que não estejam visíveis.

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

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.