Свойство Shape.InlineAlignment (Publisher)

Статья
04/07/2023

Возвращает или задает константу PbInlineAlignment , которая указывает, имеет ли встроенная фигура выравнивание слева, справа или в тексте. Для чтения и записи.

Синтаксис

expression. InlineAlignment

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

Замечания

Значение свойства InlineAlignment может быть одной из констант PbInlineAlignment , объявленных в библиотеке типов издателя Майкрософт.

Если фигура еще не является встроенной, возвращается ошибка автоматизации.

Пример

В следующем примере вторая фигура на второй странице публикации перемещается в текстовый поток с помощью метода MoveIntoTextFlow . Затем свойство InlineAlignment используется для выравнивания фигуры по правому краю.

Dim theShape As Shape 
Dim theRange As TextRange 
 
Set theRange = ActiveDocument.Pages(2).Shapes(1).TextFrame.TextRange 
Set theShape = ActiveDocument.Pages(2).Shapes(2) 
 
If Not theShape.IsInline = msoTrue Then 
 theShape.MoveIntoTextFlow Range:=theRange 
 theShape.InlineAlignment = pbInlineAlignmentRight 
End If

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

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