Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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 Descrição geral do friso do Office Fluent.
Sintaxe
expressão. Eliminar
expressão Obrigatório. Uma variável que representa um objeto CommandBar.
Comentários
Para a coleção Scripts, utilizar o método Eliminar remove todos os scripts do documento do Microsoft Word especificado, folha de cálculo do Excel ou diapositivo 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.