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