Método ShapeRange.Ungroup (PowerPoint)

Desagrupa las formas agrupadas en la forma especificada o intervalo de formas. Separa las imágenes y objetos OLE dentro de la forma especificada o intervalo de formas. Devuelve las formas desagrupadas como un solo objeto ShapeRange.

Sintaxis

expresión. Desagrupar

expresión Variable que representa un objeto ShapeRange .

Valor devuelto

ShapeRange

Observaciones

Debido a que un grupo de formas se trata como un único objeto, 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 desagrupan todas las formas agrupadas y se separan todas las imágenes y los objetos OLE de myDocument.

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    s.Ungroup

Next

Este ejemplo desagrupa cualquier forma agrupada de myDocument sin separar las imágenes u objetos OLE de la diapositiva.

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    If s.Type = msoGroup Then s.Ungroup

Next

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