Arranges the shape's stacking order by moving it back one
Syntax:
SubOrderBackOne()
Remarks:
The OrderBackOne method moves all the shapes in a shape range. The shapes are moved one step backward in the stacking order of the current layer.
Examples:
The following VBA example creates a shadow for each selected object by duplicating the objects, offsets the duplicates by a small distance, and fills the duplicates with gray.
Sub Test()
Dim srOld As ShapeRange, srNew As ShapeRange
Set srOld = ActiveSelectionRange
If srOld.Count <> 0 Then
Set srNew = srOld.Duplicate(0.05, -0.05)
srNew.ApplyUniformFill CreateRGBColor(50, 50, 50)
srNew.OrderBackOne
End If
End Sub