title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
Selection.BringForward method (Visio) |
vis_sdr.chm11116095 |
|
|
d12a81a5-6faa-6828-bdf0-279c27c89571 |
06/08/2017 |
medium |
Brings the shape or selected shapes forward one position in the z-order.
expression. BringForward
expression A variable that represents a Selection object.
Nothing
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
[!includeSupport and feedback]