Compartir a través de


Método ShapeRange.Group (PowerPoint)

Agrupa las formas del intervalo especificado. Devuelve las formas agrupadas como un objeto Shape único.

Sintaxis

expresión. Grupo

Expresión Variable que representa un objeto ShapeRange .

Valor devuelto

Forma

Comentarios

Debido a que un grupo de formas se trata como una única forma, el agrupamiento y el desagrupamiento de formas cambia el número de elementos de la colección Shapes, así como los números de índice de los elementos que siguen a los elementos de la colección que se han visto afectados.

Ejemplo:

En este ejemplo se agregan dos formas a myDocument, se agrupan las dos formas nuevas, se establece el relleno del grupo, se gira el grupo y se envía el grupo a la parte posterior de la capa de dibujo.

Set myDocument = ActivePresentation.Slides(1)

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 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.