Свойство ShapeRange.Child (PowerPoint)

Статья
04/07/2023

MsoTrue, если фигура является дочерней фигурой или если все фигуры в диапазоне фигур являются дочерними фигурами одного родителя. Только для чтения.

Синтаксис

expression. Ребенка

Выражение Переменная, представляющая объект ShapeRange .

Возвращаемое значение

MsoTriState

Замечания

Значение свойства Child может быть одной из этих констант MsoTriState .

Константа	Описание
msoFalse	Фигура не является дочерней фигурой или, если это диапазон фигур, все дочерние фигуры не принадлежат одному родителю.
msoTrue	Фигура является дочерней фигурой или, если диапазон фигур, все дочерние фигуры принадлежат одному родителю.

Пример

В этом примере выбирается первая фигура на холсте, и если выбранная фигура является дочерней фигурой, заполняет фигуру указанным цветом. В этом примере предполагается, что первой фигурой в активной презентации является холст, содержащий несколько фигур.

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

См. также

Объект ShapeRange

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через