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.