Método ShapeRange.Group (Word)
Agrupa las formas del intervalo especificado y devuelve las formas agrupadas como un único objeto Shape.
Sintaxis
expresión. Grupo
expresión requerida. Variable que representa un objeto ShapeRange.
Comentarios
Debido a que un grupo de formas se trata como una sola forma, al agrupar y desagrupar formas cambia el número de elementos de la colección Shapes y cambia los números de índice de los elementos que siguen a los elementos afectados de la colección.
Ejemplo:
En este ejemplo, se agregan dos formas a myDocument, se agrupan las dos nuevas formas, se establece el relleno del grupo, se gira y se envía al fondo de la capa de dibujo.
Set myDocument = ActiveDocument
With myDocument.Shapes
.AddShape(msoShapeCan, 50, 10, 100, 200).Name = "shpOne"
.AddShape(msoShapeCube, 150, 250, 100, 200).Name = "shpTwo"
With .Range(Array("shpOne", "shpTwo")).Group
.Fill.PresetTextured msoTextureBlueTissuePaper
.Rotation = 45
.ZOrder msoSendToBack
End With
End With
Consulte también
Objeto de colección ShapeRange
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.