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 Visão geral da faixa de opções fluente do Office.

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 controle de caixa de combinação na barra de comandos chamada Custom para a posição antes do sétimo controle na barra de comandos. O exemplo define a marca como caixa Seleção e atribui ao controle uma prioridade baixa para que ele provavelmente seja removido da barra de comandos se todos os controles não se encaixarem em uma 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

• Membros do objeto CommandBarControl

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.