ShapeRange.Ungroup, méthode (PowerPoint)

Dissocie toutes les formes groupées dans la forme ou la plage de formes spécifiée. Sépare les images et les objets OLE dans la forme ou plage de formes spécifiée. Renvoie les formes dissociées sous la forme d’un seul objet ShapeRange .

Syntaxe

expression. Dissocier

Expression Variable qui représente un objet ShapeRange .

Valeur renvoyée

ShapeRange

Remarques

Comme un groupe de formes est traité comme un objet unique, grouper et dissocier des formes modifie le nombre d'éléments dans la collection Shapes et change les numéros d'index des éléments qui suivent les éléments concernés dans la collection.

Exemple

Cet exemple montre comment dissocier toutes les formes groupées ainsi que toutes les images ou tous les objets OLE de myDocument.

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    s.Ungroup

Next

Cet exemple dissocie toutes les formes de myDocument groupées sans décomposer les images ou les objets OLE dans la diapositive.

Set myDocument = ActivePresentation.Slides(1)

For Each s In myDocument.Shapes

    If s.Type = msoGroup Then s.Ungroup

Next

Voir aussi

ShapeRange, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.