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 | A return value indicating a combination of msoTrue and msoFalse for the specified shape range. |
msoTriStateToggle | A 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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.