Поделиться через

Свойство Shape.HorizontalFlip (Издатель)

  • Статья

Указывает, была ли указанная фигура перевернута вокруг горизонтальной оси. Только для чтения.

Синтаксис

expression. HorizontalFlip

Выражение Переменная, представляющая объект Shape .

Замечания

Значение свойства HorizontalFlip может быть одной из констант MsoTriState , объявленных в библиотеке типов Microsoft Office и показанных в следующей таблице.

Константа Описание
msoFalse Фигура не была перевернута вокруг горизонтальной оси.
msoTriStateMixed Указывает сочетание msoTrue и msoFalse для указанной фигуры.
msoTrue Фигура была перевернута вокруг горизонтальной оси.

Пример

В этом примере каждая фигура активной публикации восстанавливается в исходное состояние, если она была перевернута по горизонтали или вертикали.

Sub Flipper() 
 
 Dim shpS As Shape 
 
 For Each shpS In ActiveDocument.MasterPages.Item(1).Shapes 
 If shpS.HorizontalFlip = msoTrue Then shpS.Flip msoFlipHorizontal 
 If shpS.VerticalFlip = msoTrue Then shpS.Flip msoFlipVertical 
 Next 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.