Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
MsoTrue, wenn die Form eine untergeordnete Form ist, oder wenn alle Formen in einem Formenbereich untergeordnete Formen derselben übergeordneten Form sind. Schreibgeschützt MsoTriState-Wert.
Syntax
Ausdruck. Kind
expression Erforderlich. Eine Variable, die ein Shape-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. Es wird davon ausgegangen, dass die erste Form im aktiven Dokument ein Zeichenbereich ist, der mehrere Formen enthält.
Sub FillChildShape()
Dim shpCanvasItem As Shape
'Select the first shape in the drawing canvas
Set shpCanvasItem = ActiveDocument.Shapes(1).CanvasItems(1)
'Fill selected shape if it is a child shape
With shpCanvasItem
If .Child = msoTrue Then
.Fill.ForeColor.RGB = RGB(100, 0, 200)
Else
MsgBox "This shape is not a child shape."
End If
End With
End Sub
Siehe auch
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.