Selection.ChildShapeRange-Eigenschaft (Publisher)
Gibt ein ShapeRange -Objekt zurück, das die untergeordneten Formen eines markierten Elements darstellt.
Syntax
Ausdruck. ChildShapeRange
Ausdruck Eine Variable, die ein Selection-Objekt darstellt.
Rückgabewert
ShapeRange
Beispiel
This example creates a new page in the active publication, populates the page with shapes, and selects and groups the shapes. Nachdem die Auswahl von zwei der Gruppenformen abgebrochen wurde, wird der AutoForm-Typ für eine der Shapes geändert.
Sub ChangeFillToChildShape()
With ThisDocument.Pages(1)
With .Shapes
.AddShape msoShape4pointStar, 10, 10, 175, 175
.AddShape msoShapeOval, 100, 100, 175, 75
.AddShape msoShapeOval, 150, 150, 175, 75
.Range.Group
.SelectAll
End With
.Shapes(1).GroupItems(1).Select msoFalse
.Shapes(1).GroupItems(2).Select msoFalse
End With
Selection.ChildShapeRange(3).AutoShapeType = msoShapeDiamond
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.