Compartir a través de


Método Shape.BringForward (Visio)

Mueve una posición hacia delante la forma o las formas seleccionadas en el orden z.

Sintaxis

expresión. BringForward

expresión Variable que representa un objeto Shape.

Valor devuelto

Nada

Ejemplo

La macro siguiente muestra cómo mover una forma hacia delante en el orden z en una página.

 
Public Sub BringForward_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 Dim vsoShape3 As Visio.Shape 
 
 'Draw three rectangles. 
 Set vsoShape1 = ActivePage.DrawRectangle(1, 1, 4, 4) 
 vsoShape1.Text = "1" 
 Set vsoShape2 = ActivePage.DrawRectangle(2, 2, 5, 5) 
 vsoShape2.Text = "2" 
 Set vsoShape3 = ActivePage.DrawRectangle(3, 3, 6, 6) 
 vsoShape3.Text = "3" 
 
 'Bring vsoShape1 forward one position in the z-order. 
 vsoShape1.BringForward 
 
End Sub

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.