Child Property

  • Article

MsoTriState

MsoTriState can be one of these MsoTriState constants.
msoCTrue Does not apply to this property.
msoFalse The shape is not a child shape or, if a shape range, all child shapes do not belong to the same parent.
msoTriStateMixed Does not apply to this property.
msoTriStateToggle Does not apply to this property.
msoTrue The shape is a child shape or, if a shape range, all child shapes belong to the same parent.

expression.Child

*expression   * Required. An expression that returns one of the objects in the Applies To list.

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 presentation is a drawing canvas that contains multiple shapes.

Sub FillChildShape()

    'Select the first shape in the drawing canvas
    ActivePresentation.Slides(1).Shapes(1).CanvasItems(1).Select

    'Fill selected shape if it is a child shape
    With ActiveWindow.Selection

        If .ShapeRange.Child = msoTrue Then
            .ShapeRange.Fill.ForeColor.RGB = RGB(Red:=100, Green:=0, Blue:=200)
        Else
            MsgBox "This shape is not a child shape."
        End If

    End With

End Sub

Applies to | Shape Object | ShapeRange Collection Object