Compartir a través de


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

MsoTriState

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.