Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade ShapeRange.VerticalFlip (Editor)ShapeRange.VerticalFlip Property (Publisher)

office 365 dev account|Última Atualização: 22/03/2018
|
3 Colaboradores

Retorna msoTrue se a forma especificada tiver sido invertida em torno de seu eixo vertical. Somente leitura.Returns msoTrue if the specified shape has been flipped around its vertical axis. Read-only.

SintaxeSyntax

expressão. VerticalFlipexpression. VerticalFlip

_expression_A variável que representa um objeto ShapeRange ._expression_A variable that represents a ShapeRange object.

ComentáriosRemarks

O valor da propriedade VerticalFlip pode ser uma das constantes MsoTriState declaradas na biblioteca de tipos do Microsoft Office e mostradas na tabela a seguir.The VerticalFlip property value can be one of the MsoTriState constants declared in the Microsoft Office type library and shown in the following table.

ConstanteConstantDescriçãoDescription
msoFalsemsoFalseA forma não foi invertida em torno de seu eixo vertical.The shape has not been flipped around its vertical axis.
msoTriStateMixedmsoTriStateMixedValor de retorno indicando uma combinação de msoTrue e msoFalse do intervalo de formas especificado.Return value indicating a combination of msoTrue and msoFalse for the specified shape range.
msoTriStateTogglemsoTriStateToggleValor de definição que alterna entre msoTrue e msoFalse.Set value that switches between msoTrue and msoFalse.
msoTruemsoTrueA forma foi invertida em torno de seu eixo vertical.The shape has been flipped around its vertical axis.

ExemploExample

Este exemplo restaura cada forma da publicação ativa ao seu estado original, caso tenha sido invertida horizontalmente ou verticalmente.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
© 2018 Microsoft