Objet ShapeRange (PowerPoint)

  • Article

Représente un groupe de formes dans un document. Un groupe de formes peut contenir une seule forme ou toutes les formes d’un document.

Remarques

Vous pouvez inclure les formes souhaitées (choisies parmi toutes les formes du document ou toutes les formes de la sélection) pour construire une plage de formes. Par exemple, vous pouvez générer une collection ShapeRange contenant les trois premières formes d’un document, toutes les formes sélectionnées d’un document ou toutes les formes libres d’un document.

Pour obtenir une vue d’ensemble de l’utilisation d’une seule forme ou de plusieurs formes à la fois, consultez Utiliser des formes (objets dessin).

Les exemples suivants montrent comment effectuer les tâches suivantes :

  • Retourne un ensemble de formes que vous spécifiez par nom ou numéro d’index.

  • renvoyer certaines ou toutes les formes sélectionnées dans un document.

Exemple

Utilisez Shapes.Range (index), où index est le nom ou le numéro d’index de la forme ou un tableau qui contient des noms ou des numéros d’index de formes, pour renvoyer une collection ShapeRange qui représente un ensemble de formes sur un document. Utilisez la fonction Array pour construire un tableau de noms ou de numéros d’index. Cet exemple permet de définir le motif de remplissage des formes 1 et 3 dans myDocument.

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.Range(Array(1, 3)).Fill _

    .Patterned msoPatternHorizontalBrick

L’exemple suivant permet de définir le motif de remplissage des formes nommées « Oval 4 » et « Rectangle 5 » dans myDocument.

Set myDocument = ActivePresentation.Slides(1)

Set myRange = myDocument.Shapes _

    .Range(Array("Oval 4", "Rectangle 5"))

myRange.Fill.Patterned msoPatternHorizontalBrick

Bien que vous puissiez utiliser la méthode Range pour renvoyer un nombre quelconque de formes ou de diapositives, il est plus simple d’utiliser la méthode Item si vous souhaitez renvoyer un seul membre de la collection. Par exemple, Shapes(1) est plus simple que Shapes.Range(1).

Utilisez la propriété ShapeRange de l’objet Selection pour renvoyer toutes les formes de la sélection. L’exemple ci-dessous montre comment définir la couleur de remplissage de premier plan de toutes les formes de la sélection dans la fenêtre numéro un (en supposant qu’il existe au moins une forme dans la sélection).

Windows(1).Selection.ShapeRange.Fill.ForeColor _

    .RGB = RGB(255, 0, 255)

Utilisez Selection.ShapeRange (index), où index est le nom de la forme ou le numéro d’index, pour renvoyer une seule forme dans la sélection. L’exemple suivant permet de définir la couleur de premier plan de remplissage de la forme 2 de la collection de formes sélectionnées dans la fenêtre 1, en supposant que la sélection inclut au moins une forme.

Windows(1).Selection.ShapeRange(2).Fill.ForeColor _

    .RGB = RGB(255, 0, 255)

Méthodes

Propriétés

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.