ShapeRange.IsInline 屬性 (Publisher)

會傳回 MsoTriState 常數，指定圖案是否為內嵌。 唯讀。

語法

運算式。IsInline

表達 代表 ShapeRange 物件的 變數。

範例

本範例會測試以查看其是否內嵌在出版物第一頁上第一個圖案 (文字圖文框)。 如果不存在，可以完成搜尋來尋找的文字圖文框內任何內置圖案的圖案中。 找到的所有內置圖案都有 ForeColor 屬性設為紅色。

Dim theShape As Shape 
Dim i As Integer 
 
Set theShape = ActiveDocument.Pages(1).Shapes(1) 
 
If Not theShape.IsInline = True Then 
 With theShape.TextFrame.Story.TextRange 
 If .InlineShapes.Count > 0 Then 
 For i = 1 To .InlineShapes.Count 
 .InlineShapes(i).Select 
 .InlineShapes(i).Fill.ForeColor.RGB = vbRed 
 Next 
 End If 
 End With 
End If

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。