ShapeRange.Child-Eigenschaft (Excel)

Gibt msoTrue zurück, wenn die angegebene Form eine untergeordnete Form ist oder alle Formen in einem Formenbereich untergeordnete Formen derselben übergeordneten Form sind. Gibt msoFalse zurück , wenn die ausgewählte Form keine untergeordnete Form ist. Gibt msoTriStateMixed zurück , wenn nur einige der ausgewählten Formen untergeordnete Shapes sind. Schreibgeschützter MsoTriState-Wert.

Syntax

Ausdruck. Kind

Ausdruck Eine Variable, die ein ShapeRange-Objekt darstellt.

Beispiel

In diesem Beispiel wird die erste Form im Zeichenbereich ausgewählt, und wenn es sich bei der ausgewählten Form um eine untergeordnete Form handelt, wird die Form mit der angegebenen Farbe gefüllt. In diesem Beispiel wird davon ausgegangen, dass ein Zeichenbereich mehrere Formen auf dem aktiven Arbeitsblatt enthält.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.