Objet ShapeRange (Excel)

Représente une plage de formes, qui correspond à un ensemble de formes dans un document.

Remarques

Une plage de formes peut contenir une seule forme, plusieurs formes ou toutes les formes du document. Vous pouvez inclure les formes de votre choix (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.

Exemple

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

Utilisez Plage (index), où index correspond au nom ou au numéro d’index de la forme ou d’un tableau qui contient les noms ou les numéros d’index des formes, pour retourner une collection ShapeRange qui représente un ensemble de formes sur un document. Utilisez la fonction Tableau 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 = Worksheets(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.

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

Set myDocument = Worksheets(1) 
Set myRange = myDocument.Shapes.Range(Array("Oval 4", _ 
 "Rectangle 5")) 
myRange.Fill.Patterned msoPatternHorizontalBrick

Renvoyer l’ensemble ou une partie des formes sélectionnées dans un document

La propriété ShapeRange de l’objet Selection permet de 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)

Utiliser la sélection. ShapeRange (index), où index correspond au nom ou au numéro d’index, pour renvoyer une forme unique 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.

  • Last updated on