Partager via


Méthode Page.DrawOval (Visio)

Ajoute un ovale (ellipse) à la collection Shapes d'une page.

Syntaxe

expression. DrawOval( _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 de l'ellipse.
y1 Obligatoire Double Coordonnée y d'un coin du cadre largeur/hauteur de l'ellipse.
x2 Obligatoire Double Coordonnée x de l'autre coin du cadre largeur/hauteur de l'ellipse.
y2 Obligatoire Double Coordonnée y de l'autre coin du cadre largeur/hauteur de l'ellipse.

Valeur renvoyée

Shape

Remarques

Utiliser la méthode DrawOval revient à utiliser l'outil Ellipse 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 l'ellipse est placée.

Exemple

L'exemple suivant indique comment dessiner un ovale (ellipse) sur la page active.

 
Public Sub DrawOval_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawOval(1.5, 10.5, 7.5, 6.5) 
 
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.