Excel) (ShapeRange.Child 屬性

如果指定的圖案是子圖案，或者圖案範圍中的所有圖案都是同一個父圖案的子圖案，則會傳回 msoTrue。 如果選取的圖形不是子圖案，則會傳回 msoFalse 。 如果只有部分選取的圖形是子圖案，則會傳回 msoTriStateMixed 。 唯讀的 MsoTriState。

語法

運算式。孩子

表達 代表 ShapeRange 物件的 變數。

範例

本範例選取畫布上的第一個圖案，且如果選定的圖案為子圖案的話，則用指定的色彩填滿圖案。 假設使用中工作表上的繪圖畫布中有多個圖案。

Sub FillChildShape() 
 
    'Select the first shape in the drawing canvas. 
    ActiveSheet.Shapes(1).CanvasItems(1).Select 
 
    'Fill selected shape if it is a child shape. 
    If Selection.ShapeRange.Child = msoTrue Then 
        Selection.ShapeRange.Fill.ForeColor.RGB = RGB(100, 0, 200) 
    Else 
        MsgBox "This shape is not a child shape." 
    End If 
 
End Sub

支援和意見反應

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