Page.DrawRectangle method (Visio)
Adds a rectangle to the Shapes collection of a page, master, or group.
expression A variable that represents a Page object.
|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.|
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.
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.