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

Возвращает константу MsoTriState, если с указанной фигурой связан объект TextFrame . Только для чтения.

Синтаксис

expression. HasTextFrame

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

Замечания

Если свойство HasTextFrame имеет значение true, клиенты должны проверить значение свойства HasText объекта TextFrame , чтобы определить, есть ли текст на фигуре.

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

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

Пример

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

Sub MoveLeft() 
 
 Dim shpAll As ShapeRange 
 
 Set shpAll = Application.ActiveDocument.Selection.ShapeRange 
 If shpAll.HasTextFrame = msoFalse Then 
 shpAll.Align msoAlignLefts, msoTrue 
 End If 
 
End Sub

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

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