Share via


ShapeRange.Child Property

Excel Developer Reference

Returns msoTrue if the specified 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   A variable that represents a ShapeRange object.

Remarks

MsoTriState can be one of these MsoTriState constants.
msoCTrue. Does not apply to this property.
msoFalse. If the selected shape is not a child shape.
msoTriStateMixed. If only some of the selected shapes are child shapes.
msoTriStateToggle. Does not apply to this property.
msoTrue. If the selected shape is a child shape.

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 a drawing canvas contains multiple shapes on the active worksheet.

Visual Basic for Applications
  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.<strong>Child</strong> = msoTrue Then
    Selection.ShapeRange.Fill.ForeColor.RGB = RGB(100, 0, 200)
Else
    MsgBox "This shape is not a child shape."
End If

End Sub

See Also