Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Crea una línea. Devuelve un objeto Shape que representa la nueva línea.
Sintaxis
expresión.
AddLine( _BeginX_, _BeginY_, _EndX_, _EndY_ )
expresión Variable que representa un objeto Shapes.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| BeginX | Obligatorio | Single | Posición horizontal, medida en puntos, del extremo inicial de la línea en relación con el borde izquierdo de la diapositiva. |
| BeginY | Obligatorio | Single | Posición vertical, medida en puntos, del extremo inicial de la línea en relación con el borde superior de la diapositiva. |
| EndX | Obligatorio | Single | Posición horizontal, medida en puntos, del extremo final de la línea en relación con el borde izquierdo de la diapositiva. |
| EndY | Obligatorio | Single | Posición vertical, medida en puntos, del extremo final de la línea en relación con el borde superior de la diapositiva. |
Valor devuelto
Forma
Ejemplo
En este ejemplo se agrega una línea azul discontinua a myDocument.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(BeginX:=10, BeginY:=10, _
EndX:=250, EndY:=250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(50, 0, 128)
End With
Vea también
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.