VerticalFlip Property

       

Returns msoTrue if the specified shape has been flipped around its vertical axis. Read-only MsoTriState.

MsoTriState can be one of these MsoTriState constants.
msoCTrue  Not used with this property.
msoFalse  The shape has not been flipped around its vertical axis.
msoTriStateMixed  Indicates a combination of msoTrue and msoFalse for the specified shape range.
msoTriStateToggle  Not used with this property.
msoTrue  The shape has been flipped around its vertical axis.

expression.VerticalFlip

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

Example

This example restores each shape on the active publication to its original state if it's been flipped horizontally or vertically.

Sub Flipper()

    Dim shpBall As Shape

    For Each shpBall In ActiveDocument.MasterPages.Item(1).Shapes
        If shpBall.HorizontalFlip = msoTrue Then shpBall.Flip msoFlipHorizontal
        If shpBall.VerticalFlip = msoTrue Then shpBall.Flip msoFlipVertical
    Next

End Sub