Método CommandBarControl.Move (Office)

Mueve el control CommandBarControl especificado a una barra de comandos existente.

Nota:

El uso de CommandBars en algunas aplicaciones de Microsoft Office sustituido por el nuevo componente cinta de la interfaz de usuario de Microsoft Office Fluent. Para obtener más información, vea Información general de la cinta de opciones de Office Fluent.

Sintaxis

expresión. Mover (Barra, Antes)

expresión requerida. Variable que representa un objeto CommandBarControl.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Bar	Opcional	Variant	Un objeto Command que representa la barra de comandos de destino para el control. Si se omite este argumento, el control se mueve al final de la barra de comandos donde reside actualmente el control.
Antes	Opcional	Variant	Número que indica la posición del control. El control se inserta antes del control que ocupa actualmente esta posición. Si se omite este argumento, el control se inserta en la misma barra de comandos.

Ejemplo:

En este ejemplo se mueve el primer control de cuadro combinado de la barra de comandos denominada Personalizado a la posición anterior al séptimo control de esa barra de comandos. En el ejemplo se establece la etiqueta en el cuadro Selección y se asigna al control una prioridad baja para que probablemente se quite de la barra de comandos si todos los controles no caben en una fila.

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

Consulte también

• Miembros del objeto CommandBarControl

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.