Clase Border (Excel VBA)

La clase Border representa el borde de un objeto.

Set

Para usar una variable de clase Border, primero debe ser instanciado, por ejemplo

Dim brd as Border
Set brd = ActiveCell.BorderAround()

Los siguientes procedimientos se pueden usar para establecer variables de clase Border : Axis.Border, Borders.Item, DataTable.Border, DropLines.Border, ErrorBars.Border, Gridlines.Border, HiLoLines.Border, LeaderLines.Border, OLEObject.Border, OLEObjects.Border, Range.BorderAround, SeriesLines.Border, Trendline.Border, AboveAverage.Borders, CellFormat.Borders, DisplayFormat.Borders, FormatCondition.Borders, Range.Borders, Style.Borders, TableStyleElement.Borders, Top10.Borders y UniqueValues.Borders

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Border en una colección.

Dim brd As Border
For Each brd In Application.Borders
	
Next brd

Propiedades

Color Devuelve o establece el color primario del objeto, tal como se muestra en la tabla de la sección Comentarios.

ActiveCell.BorderAround.Color = RGB(0,0,255)'blue

ColorIndex Devuelve o establece un valor de tipo Variant que representa el color del borde.

ActiveCell.BorderAround.ColorIndex = xlColorIndexAutomatic

LineStyle Devuelve o configura el estilo de línea para el borde.

ActiveCell.BorderAround.LineStyle = xlContinuous

Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveCell.BorderAround.Parent

ThemeColor Devuelve o establece el color del tema de la combinación de colores aplicada que está asociada con el objeto especificado.

ActiveCell.BorderAround.ThemeColor =

TintAndShade Devuelve o establece un valor Single que aclara u oscurece un color.

ActiveCell.BorderAround.TintAndShade =

Weight Devuelve o establece un valor de tipo XlBorderWeight que representa el grosor del borde.

ActiveCell.BorderAround.Weight = xlMedium

Borders.Color Devuelve o establece el color primario del objeto, tal como se muestra en la tabla de la sección Comentarios.

ActiveCell.DisplayFormat.Borders.Color = RGB(0,0,255)'blue

Borders.ColorIndex Devuelve o establece un valor de tipo Variant que representa el color de los cuatro bordes.

ActiveCell.DisplayFormat.Borders.ColorIndex =

Borders.Count Devuelve un valor Long que representa el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveCell.DisplayFormat.Borders.Count

Borders.Item Devuelve un objeto Border que representa uno de los bordes de un rango de celdas o un estilo.

Dim brdItem As Border
Set brdItem = ActiveCell.DisplayFormat.Borders(Index:=xlEdgeBottom)

Borders.LineStyle Devuelve o configura el estilo de línea para el borde.

ActiveCell.DisplayFormat.Borders.LineStyle = xlContinuous

Borders.Parent Devuelve el objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveCell.DisplayFormat.Borders.Parent

Borders.ThemeColor Devuelve o establece el color del tema de la combinación de colores aplicada que está asociada con el objeto especificado.

ActiveCell.DisplayFormat.Borders.ThemeColor =

Borders.TintAndShade Devuelve o establece un valor Single que aclara u oscurece un color.

ActiveCell.DisplayFormat.Borders.TintAndShade =

Borders.Value Sinónimo de Borders. LineStyle.

ActiveCell.DisplayFormat.Borders.Value =

Borders.Weight Devuelve o establece un valor de tipo XlBorderWeight que representa el grosor del borde.

ActiveCell.DisplayFormat.Borders.Weight =