Propiedad LineFormat.InsetPen (Excel)
Devuelve o establece si se se van a trazar líneas dentro de los límites de la forma especificada. Lectura y escritura.
Sintaxis
expresión. InsetPen
Expresión Variable que representa un objeto LineFormat .
Valor devuelto
Comentarios
msoTrue (-1) si las líneas se dibujan dentro de los límites de la forma; De lo contrario, msoFalse (0).
Ejemplo:
En el ejemplo de código siguiente se agregan dos rectángulos a la hoja de cálculo activa (el primero con las líneas trazadas dentro de sus límites y el segundo con las líneas trazadas sobre sus límites).
Dim shpNew As Shape
With ActiveSheet.Shapes
Set shpNew = .AddShape(Type:=msoShapeRectangle, _
Left:=200, Top:=150, Width:=150, Height:=100)
With shpNew.Line
.Weight = 24
.InsetPen = msoTrue
End With
Set shpNew = .AddShape(Type:=msoShapeRectangle, _
Left:=200, Top:=300, Width:=150, Height:=100)
With shpNew.Line
.Weight = 24
.InsetPen = msoFalse
End With
End With
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.