如果指定的圖案是子圖案,或者圖案範圍中的所有圖案都是同一個父圖案的子圖案,則會傳回 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 支援與意見反應。