CanvasShapes.AddCallout, méthode (Word)

Article
04/07/2023

Cette méthode ajoute une légende sans bordure à une zone de dessin. Elle renvoie un objet Shape qui représente la légende.

Syntaxe

expression. AddCallout (Type, Left, Top, Width, Height)

expression Obligatoire. Variable qui représente une collection CanvasShapes.

Parameters

Nom	Requis/Facultatif	Type de données	Description
Type	Obligatoire	MsoCallout	Type de légende.
Left	Obligatoire	Unique	Position, en points, du bord gauche du cadre englobant de la légende.
Top	Obligatoire	Unique	Position, en points, du bord supérieur du cadre englobant de la légende.
Width	Obligatoire	Unique	Largeur, en points, du cadre englobant de la légende.
Height	Obligatoire	Unique	Hauteur, en points, du cadre englobant de la légende.

Remarques

Vous pouvez insérer un nombre plus important de légendes, telles que les bulles de pensées, grâce à l'aide de la méthode AddShape.

Exemple

Cet exemple montre comment ajouter une légende à une nouvelle zone de dessin.

Sub NewCanvasCallout() 
 Dim shpCanvas As Shape 
 
 'Add drawing canvas to the active document 
 Set shpCanvas = ActiveDocument.Shapes.AddCanvas _ 
 (Left:=150, Top:=150, Width:=200, Height:=300) 
 
 'Add callout to the drawing canvas 
 shpCanvas.CanvasItems.AddCallout _ 
 Type:=msoCalloutTwo, Left:=100, _ 
 Top:=40, Width:=150, Height:=75 
End Sub

Voir aussi

CanvasShapes, Collection

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.

Partager via