Nota
L'accés a aquesta pàgina requereix autorització. Podeu provar d'iniciar la sessió o de canviar els directoris.
L'accés a aquesta pàgina requereix autorització. Podeu provar de canviar els directoris.
Agrega un rectángulo a la colección Shapes de una página, un patrón o un grupo.
Sintaxis
expresión.
DrawRectangle( _x1_ , _y1_ , _x2_ , _y2_ )
expresión Variable que representa un objeto Page .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| x1 | Obligatorio | Double | Coordenada x de una esquina del cuadro que circunscribe al rectángulo. |
| y1 | Obligatorio | Double | Coordenada y de una esquina del cuadro que circunscribe al rectángulo. |
| x2 | Obligatorio | Double | Coordenada x de la otra esquina del cuadro que circunscribe al rectángulo. |
| y2 | Obligatorio | Double | Coordenada y de la otra esquina del cuadro que circunscribe al rectángulo. |
Valor devuelto
Forma
Comentarios
Utilizar el método DrawRectangle equivale a usar la herramienta Rectángulo en la aplicación. Los argumentos se expresan en unidades de dibujo internas con respecto al espacio de coordenadas del patrón, la página o el grupo donde se va a dibujar el rectángulo.
Ejemplo
En el ejemplo siguiente se muestra cómo dibujar un rectángulo en la página activa.
Public Sub DrawRectangle_Example()
Dim vsoShape As Visio.Shape
Set vsoShape = ActivePage.DrawRectangle(1, 4, 4, 1)
End Sub
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.