Freigeben über


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.