ShapeRange.VerticalFlip Property (Publisher)

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

Syntax

expression. VerticalFlip

expression A variable that represents a ShapeRange object.

Remarks

The VerticalFlip property value can be one of the MsoTriState constants declared in the Microsoft Office type library and shown in the following table.

Constant Description
msoFalse The shape has not been flipped around its vertical axis.
msoTriStateMixed Return value indicating a combination of msoTrue and msoFalse for the specified shape range.
msoTriStateToggle Set value that switches between msoTrue and msoFalse.
msoTrue The shape has been flipped around its vertical axis.

Example

This example restores each shape on the active publication to its original state if it has 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