Partager via


Objet ShapeRange (Project)

Représente une plage de formes, qui est une collection d’une ou plusieurs formes dans un rapport.

Remarques

Project utilise la même infrastructure Office Art que celle utilisée par d’autres applications Office et adapte Office Art aux rapports, tables et graphiques qui peuvent utiliser des champs dans le projet actif. Toutefois, Project n’implémente pas toutes les opérations ShapeRange . Par exemple, Project ne prend pas en charge l’alignement, la distribution, le regroupement ou la fusion automatiques de formes dans une plage de formes.

Une plage de formes peut contenir une seule forme ou toutes les formes du rapport. Vous pouvez inclure les formes que vous souhaitez construire une plage de formes. Par exemple, vous pouvez construire une collection ShapeRange qui contient les trois premières formes d’un état, toutes les formes d’un état ou uniquement les formes de triangle.

[!REMARQUE] La plupart des opérations que vous pouvez faire avec un objet Shape, vous pouvez également faire avec un objet ShapeRange qui contienne une seule forme. Certaines opérations, lorsqu’elles sont effectuées sur un objet ShapeRange qui contient plusieurs formes, des formes de différents types ou une forme qui n’est pas entièrement prise en charge dans Project, peuvent entraîner une erreur. Par exemple, si une plage de formes contient un rectangle et un graphique et que vous essayez de définir la propriété Fill , l’instruction échoue car un graphique n’implémente pas la propriété Fill . Dans d’autres cas, par exemple, si vous utilisez la propriété Rotation sur une plage de formes qui contient un graphique et un rectangle, Project fait pivoter le rectangle, mais ignore silencieusement le graphique.

Exemples

Vous pouvez retourner un ensemble de formes spécifiées par le numéro d’index ou par le nom de la forme. Utilisez Shapes.Range(index), où index est un tableau de numéros d’index ou de noms. Par exemple, les deux instructions suivantes sont valides :

Set myRange1 = theReport.Shapes.Range(Array(1, 2))
Set myRange2 = theReport.Shapes.Range(Array("Textbox 1", "Textbox 2"))

Pour créer un objet ShapeRange qui contient toutes les formes du rapport, utilisez une instruction telle que la suivante :

Set allShapes = theReport.Shapes.Range(Array(1, theReport.Shapes.Count))

Pour créer un objet ShapeRange avec un seul membre de la collection Shapes , vous pouvez utiliser des instructions telles que les suivantes :

Set myRange3 = theReport.Shapes.Range(2)
Set myRange4 = theReport.Shapes.Range("Rectangle 2")

Pour effectuer une opération sur une seule forme dans une collection ShapeRange , vous pouvez utiliser des instructions telles que les suivantes :

myRange1(2).Fill.ForeColor.RGB = RGB(120, 120, 80)
myRange1("Textbox 2").Fill.ForeColor.RGB = RGB(120, 120, 80)

Vous pouvez également effectuer une opération directement sur un objet Shape , sans utiliser de plage de formes.

theReport.Shapes("Big rectangle").Fill.ForeColor.RGB = RGB(120, 120, 80)

Méthodes

Description
La méthode Align n’est pas implémentée dans Project.
Applique la mise en forme à une plage de formes, où les informations de mise en forme ont été copiées à l’aide de la méthode PickUp .
Copie la plage de formes dans le Presse-papiers.
Coupe la plage de formes dans le Presse-papiers.
Supprime la plage de formes.
La méthode Distribute n’est pas implémentée dans Project.
Duplique une plage de formes et retourne une référence à la copie.
Retourne chaque forme de la plage de formes autour de son axe horizontal ou vertical.
La méthode Group n’est pas implémentée dans Project.
Déplace horizontalement chaque forme de la plage de formes selon le nombre de points spécifié.
Fait pivoter chaque forme de la plage de formes autour de l’axe des z selon le nombre de degrés spécifié.
Déplace verticalement chaque forme de la plage de formes en fonction du nombre de points spécifié.
Obtient un objet Shape individuel dans la collection de plages de formes.
La méthode MergeShapes n’est pas implémentée dans Project.
Copie la mise en forme de la plage de formes.
La méthode Regroup n’est pas implémentée dans Project.
La méthode RerouteConnections n’est pas implémentée dans Project.
Met à l’échelle la hauteur de la plage de formes selon un facteur spécifié.
Met à l’échelle la largeur de la plage de formes selon un facteur spécifié.
Sélectionne chaque forme d’une plage de formes.
Applique la mise en forme d’une forme par défaut à chaque forme de la plage.
La méthode Ungroup n’est pas implémentée dans Project.
Déplace la plage de formes devant ou derrière d’autres formes (autrement dit, modifie la position dans l’ordre de plan).

Propriétés

Nom
Adjustments
AlternativeText
Application
AutoShapeType
BackgroundStyle
BlackWhiteMode
Callout
Chart
Child
ConnectionSiteCount
Connector
ConnectorFormat
Count
Fill
Glow
GroupItems
HasChart
HasTable
Height
HorizontalFlip
ID
Left
Line
LockAspectRatio
Nom
Nodes
Parent
ParentGroup
Reflection
Rotation
Script
Shadow
ShapeStyle
SoftEdge
Table
TextEffect
TextFrame
TextFrame2
ThreeD
Titre
Top
Type
Value
VerticalFlip
Vertices
Visible
Width
ZOrderPosition

Voir aussi

Objet Shapes

Objet Shape

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.