Compartilhar via


Método CommandBar.Delete (Office)

Exclui o objeto CommandBar da coleção.

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. Excluir

expressão Obrigatório. Uma variável que representa um objeto CommandBar.

Comentários

Para a coleção Scripts , o uso do método Delete remove todos os scripts do documento do Microsoft Word especificado, da planilha do Excel ou do slide do PowerPoint. Uma âncora de script é representada por uma forma no aplicativo host. Portanto, o objeto Shape associado a cada âncora de script do tipo msoScriptAnchor é excluído da coleção de formas no Excel e PowerPoint e das coleções de formas no Word e InlineShapes.

Exemplo

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

foundFlag = False  
delBars = 0 
For Each bar In CommandBars 
    If (bar.BuiltIn = False) And _ 
    (bar.Visible = False) Then 
        bar.Delete 
        foundFlag = True
        delBars = delBars + 1 
    End If 
Next bar 
If Not foundFlag Then 
    MsgBox "No command bars have been deleted." 
Else 
    MsgBox delBars & " custom 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.