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.