共用方式為


ShapeRange.HasTextFrame 屬性 (Publisher)

指出指定的圖案是否具有與其相關聯的 TextFrame 物件。 唯讀。

語法

運算式HasTextFrame

表達 代表 ShapeRange 物件的 變數。

註解

如果HasTextFrame屬性為 true,用戶端必須檢查TextFrame物件的HasText屬性值,以判斷圖形上是否有任何文字。

HasTextFrame屬性值可以是 Microsoft Office 類型程式庫中所宣告的MsoTriState常數之一,如下表所示。

常數 描述
msoFalse 指定的圖案不具有與它相關聯的 TextFrame 物件。
msoTriStateMixed 會指出 在 msoTruemsoFalse 指定的圖案範圍內的組合。
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 支援與意見反應