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.