Objeto Border (Excel)

Representa el borde de un objeto.

Comentarios

La mayoría de los objetos con borde (excepto los objetos Range y Style ) tienen un borde que se trata como una sola entidad, independientemente del número de lados que tenga. El borde completo debe devolverse como una unidad.

Utilice la propiedad Border , como de un objeto TrendLine , para devolver el objeto Border para este tipo de objeto.

Tenga en cuenta que las propiedades visuales de un objeto Border están entrelazadas; es decir, cambiar una propiedad puede inducir cambios en otra. En la mayoría de los casos, los cambios inducidos sirven para que el borde sea visible (lo que puede o no ser deseable). Sin embargo, otros resultados (más inesperados) son posibles.

A continuación se muestra un ejemplo de interbloqueo con resultados inesperados. En este ejemplo, al establecer la propiedad Weight de un borde en xlThick, la propiedad LineStyle se convierte en xlSolid a pesar de haberla establecido previamente en xlDashDotDot.

   Sub InterlockingExample()
       Dim SomeRange As Range
       Dim SomeBorder As Border
       
       Set MyRange = Selection
       Set SomeBorder = MyRange.Borders(xlDiagonalDown)
       SomeBorder.Color = RGB(255, 0, 0)
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 1
       Debug.Print "Set SomeBorder.LineStyle = xlDashDotDot"          'Set SomeBorder.LineStyle = xlDashDotDot
       SomeBorder.LineStyle = xlDashDotDot
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 5
       Debug.Print "Set SomeBorder.Weight = xlThick"                  'Set SomeBorder.Weight = xlThick
       SomeBorder.Weight = xlThick
       Debug.Print "SomeBorder.LineStyle = " & SomeBorder.LineStyle   'SomeBorder.LineStyle = 1
   End Sub

Ejemplo:

En el siguiente ejemplo se cambia el tipo y el estilo de una línea de tendencia en el gráfico activo.

With ActiveChart.SeriesCollection(1).Trendlines(1) 
 .Type = xlLinear 
 .Border.LineStyle = xlDash 
End With

Los objetos Range y Style tienen cuatro bordes discretos (izquierda, derecha, superior e inferior) que se pueden devolver individualmente o como grupo. Use la propiedad Borders para obtener la colección Borders, que contiene los cuatro bordes y los trata como una unidad. En el ejemplo siguiente se agrega un borde doble a la celda A1 de la hoja de cálculo uno.

Worksheets(1).Range("A1").Borders.LineStyle = xlDouble

Use Borders (index), donde index identifica el borde, para devolver un único objeto Border . En el siguiente ejemplo se establece el color del borde inferior de las celdas A1:G1.

Worksheets("Sheet1").Range("A1:G1"). _ 
 Borders(xlEdgeBottom).Color = RGB(255, 0, 0)

Index puede ser una de las siguientes constantes XlBordersIndex : xlDiagonalDown, xlDiagonalUp, xlEdgeBottom, xlEdgeLeft, xlEdgeRight, xlEdgeTop, xlInsideHorizontal o xlInsideVertical.

Propiedades

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.