Clase Borders (Excel VBA)

Colección de cuatro objetos Border que representan los cuatro bordes de un objeto Range o un objeto Style . Para usar una variable de clase Borders, primero debe ser instanciado, por ejemplo

Dim brds as Borders
Set brds = ActiveCell.DisplayFormat.Borders

For Each

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

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

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

ColorIndex

Devuelve o establece un valor de tipo Variant que representa el color de los cuatro bordes. Posibles valores de retorno son xlColorIndexAutomatic - Color automático, xlColorIndexNone - Sin color.

Devuelve Null si los cuatro bordes no son del mismo color. El color se especifica como un valor de índice para la paleta de colores activa o bien como una de las siguientes constantes XlColorIndex: xlColorIndexAutomatic o xlColorIndexNone.

ActiveCell.DisplayFormat.Borders.ColorIndex =

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

Item

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

Item (Index)

Index: Puede ser una de las constantes XlBordersIndex .

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

LineStyle

Devuelve o configura el estilo de línea para el borde. Posibles valores de retorno son xlContinuous - Línea continua, xlDash - Línea con guiones, xlDashDot - Guiones y puntos alternados, xlDashDotDot - Guión seguido de dos puntos, xlDot - Línea de puntos, xlDouble - Línea doble, xlLineStyleNone - Sin línea, xlSlantDashDot - Guiones inclinados.

ActiveCell.DisplayFormat.Borders.LineStyle = xlContinuous

ThemeColor

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

Al intentar tener acceso a un color de tema de un objeto cuyo color no se encuentre incluido en el tema en ese momento, se producirá un error en tiempo de ejecución por solicitud no válida.

ActiveCell.DisplayFormat.Borders.ThemeColor =

TintAndShade

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

Puede escribir un número comprendido entre-1 (más oscuro) y 1 (más claro) para la propiedad TintAndShade . Si se intenta establecer esta propiedad en un valor menor que-1 o mayor que 1, se produce un error en tiempo de ejecución: "el valor especificado está fuera del intervalo".

ActiveCell.DisplayFormat.Borders.TintAndShade =

Value

Sinónimo de Borders. LineStyle.

ActiveCell.DisplayFormat.Borders.Value =

Weight

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

ActiveCell.DisplayFormat.Borders.Weight =