Método Shape.Ungroup (Publisher)

Desagrupa el grupo de formas especificado o cualquier grupo de formas del intervalo de formas especificado. Si la forma especificada es una imagen o un objeto OLE, Microsoft Publisher la separa y la convierte en un conjunto de formas desagrupadas. Por ejemplo, una hoja de cálculo incrustada de Microsoft Office Excel se convierte en líneas y cuadros de texto.

Devuelve las formas desagrupadas como un solo objeto ShapeRange.

Sintaxis

expresión. Desagrupar

expresión Variable que representa un objeto Shape.

Valor devuelto

ShapeRange

Observaciones

Using this method on an inline shape or a shape that isn't a group, picture, or OLE object generates an error. Also, an error occurs if the picture is a bitmap, JPEG, GIF, or PNG (Portable Network Graphics) file.

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.

Además, se agregan formas desagrupadas recientemente a la colección de formas en la página actual (o páginas) o área de borrador. Como resultado, puede moverse de un conjunto a otro.

Ejemplo

En este ejemplo se desagrupan las formas agrupadas en la primera página de la publicación activa.

Dim shpLoop As Shape 
 
For Each shpLoop In ActiveDocument.Pages(1).Shapes 
 If shpLoop.Type = pbGroup Then shpLoop.Ungroup 
Next shpLoop 

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.