Share via


Flip Method [Publisher 2003 VBA Language Reference]

Flips the specified shape around its horizontal or vertical axis, or flips all the shapes in the specified shape range around their horizontal or vertical axes.

expression.Flip(FlipCmd)

expression Required. An expression that returns one of the objects in the Applies To list.

MsoFlipCmd

MsoFlipCmd can be one of these MsoFlipCmd constants.
msoFlipHorizontal
msoFlipVertical

Example

This example adds a triangle to the first page of the active publication, duplicates the triangle, and then flips the duplicate triangle vertically and makes it red.

With ActiveDocument.Pages(1).Shapes _
        .AddShape(Type:=msoShapeRightTriangle, _
        Left:=10, Top:=10, Width:=50, Height:=50) _
        .Duplicate
    .Fill.ForeColor.RGB = RGB(255, 0, 0)
    .Flip msoFlipVertical
End With

Applies to | Shape Object | ShapeRange Collection