Compartilhar via


CommandBarControl.Move method (Office) (Método CommandBarControl.Move [Office])

Move o CommandBarControl de especificado para uma barra de comandos existente.

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. Mover (Barra, Antes)

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Bar Opcional Variant Um objeto Command que representa a barra de comandos de destino para o controle. Se esse argumento for omitido, o controle é movido para o final da barra de comandos onde o controle reside no momento.
Before Opcional Variant Um número que indica a posição do controle. O controle é inserido antes do controle que ocupa essa posição no momento. Se esse argumento for omitido, o controle será inserido na mesma barra de comandos.

Exemplo

Este exemplo move o primeiro controlo da caixa de combinação na barra de comandos denominada Personalizar para a posição antes do sétimo controlo nessa barra de comandos. O exemplo define a etiqueta como Caixa de seleção e atribui ao controlo uma prioridade baixa para que seja provavelmente removida da barra de comandos se todos os controlos não caberem numa linha.

Set allcontrols = CommandBars("Custom").Controls 
For Each ctrl In allControls 
    If ctrl.Type = msoControlComboBox Then 
        With ctrl 
            .Move Before:=7 
             .Tag = "Selection box" 
             .Priority = 5 
         End With 
         Exit For 
    End If 
Next

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.