Shape.Child Property

True if the shape is a child shape or if all shapes in a shape range are child shapes of the same parent. Read-only MsoTriState.

Syntax

expression.Child

expression   Required. A variable that represents a Shape object.

Example

This example selects the first shape in the canvas and, if the selected shape is a child shape, fills the shape with the specified color. This example assumes that the first shape in the active document is a drawing canvas that contains multiple shapes.

  Sub FillChildShape()
Dim shpCanvasItem As Shape

'Select the first shape in the drawing canvas
Set shpCanvasItem = ActiveDocument.Shapes(1).CanvasItems(1)

'Fill selected shape if it is a child shape
With shpCanvasItem
    If .<strong class="bterm">Child</strong> = msoTrue Then
        .Fill.ForeColor.RGB = RGB(100, 0, 200)
    Else
        MsgBox "This shape is not a child shape."
    End If
End With

End Sub

See Also

• Shape Object
• Shape Object Members