Método Move
Puede que algunas partes de este tema no sean aplicables a algunos idiomas.
Mueve el control de la barra de comandos especificado a una barra de comandos existente.
expresión.Move(Bar, Before)
expresión Requerida. Expresión que devuelve uno de los objetos anteriores.
Bar Variant opcional. Objeto CommandBar que representa la barra de comandos de destino del control. Si se omite este argumento, el control se mueve al final de la barra de comandos en que se encuentra actualmente.
Before Variant opcional. 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.
Método Move cuando se aplica al objeto Assistant.
Mueve el Ayudante de Office a la ubicación especificada.
expresión.Move(xLeft, yTop)
expresión Requerida. Expresión que devuelve un objeto Assistant.
xLeft Integer Requerido. Posición izquierda, en puntos, de la ventana del Ayudante de Office.
yTop Integer Requerido. Posición superior, en puntos, de la ventana del Ayudante de Office.
Ejemplo
Este ejemplo mueve el primer control de cuadro combinado desde la barra de comandos personalizada denominada Custom a la posición anterior al séptimo control de dicha barra. El ejemplo establece la etiqueta "Selection box" y asigna una prioridad baja al control para que se elimine de la barra de comandos si no se ajustan todos los controles a 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 Método Move cuando se aplica al objeto Assistant.
Este ejemplo muestra el Ayudante de Office en la ubicación especificada y establece varias opciones antes de mostrarlo.
With Assistant
.Reduced = True
.Move xLeft:= 400, yTop:= 300
.MoveWhenInTheWay = True
.TipOfDay = True
.Visible = True
.Animation = msoAnimationGreeting
End With