Méthode Page.DrawRectangle (Visio)

Ajoute un rectangle à la collection Shapes d'une page, d'une forme de base ou d'un groupe.

Syntaxe

expression. DrawRectangle( _x1_ , _y1_ , _x2_ , _y2_ )

Expression Variable qui représente un objet Page .

Parameters

Nom	Requis/Facultatif	Type de données	Description
x1	Obligatoire	Double	Coordonnée x d'un coin du cadre largeur/hauteur du rectangle.
y1	Obligatoire	Double	Coordonnée y d'un coin du cadre largeur/hauteur du rectangle.
x2	Obligatoire	Double	Coordonnée x de l'autre coin du cadre largeur/hauteur du rectangle.
y2	Obligatoire	Double	Coordonnée y de l'autre coin du cadre largeur/hauteur du rectangle.

Valeur renvoyée

Shape

Remarques

Utiliser la méthode DrawRectangle revient à utiliser l'outil Rectangle dans l'application. Les arguments sont en unités de dessin internes par rapport à l'espace coordonné de la page, de la forme de base ou du groupe sur lequel le rectangle est déposé.

Exemple

L'exemple suivant indique comment dessiner un rectangle sur la page active.

 
Public Sub DrawRectangle_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawRectangle(1, 4, 4, 1) 
 
End Sub

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.