Shape.BringForward method (Visio)
Brings the shape or selected shapes forward one position in the z-order.
Syntax
expression. BringForward
expression A variable that represents a Shape object.
Return value
Nothing
Example
The following macro shows how to bring a shape forward in the z-order on a page.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.