Propiedad Selection.ChildShapeRange (Publisher)

Devuelve un objeto ShapeRange que representa las formas secundarias de una selección.

Sintaxis

expresión. ChildShapeRange

expresión Variable que representa un objeto Selection .

Valor devuelto

ShapeRange

Ejemplo

En este ejemplo se crea una página nueva en la publicación activa y se llena de formas, que se seleccionan y agrupan. Después de cancelar la selección de dos de las formas de grupo, cambia el tipo de autoforma para una de las formas.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.