Page.DrawRectangle method (Visio)
Adds a rectangle to the Shapes collection of a page, master, or group.
Syntax
expression. DrawRectangle( _x1_ , _y1_ , _x2_ , _y2_ )
expression A variable that represents a Page object.
Parameters
| Name | Required/Optional | Data type | Description |
|---|---|---|---|
| x1 | Required | Double | The x-coordinate of one corner of the rectangle's width-height box. |
| y1 | Required | Double | The y-coordinate of one corner of the rectangle's width-height box. |
| x2 | Required | Double | The x-coordinate of the other corner of the rectangle's width-height box. |
| y2 | Required | Double | The y-coordinate of the other corner of the rectangle's width-height box. |
Return value
Shape
Remarks
Using the DrawRectangle method is equivalent to using the Rectangle tool in the application. The arguments are in internal drawing units with respect to the coordinate space of the page, master, or group where the rectangle is being placed.
Example
The following example shows how to draw a rectangle on the active page.
Public Sub DrawRectangle_Example()
Dim vsoShape As Visio.Shape
Set vsoShape = ActivePage.DrawRectangle(1, 4, 4, 1)
End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.