Clase Border - borde (Excel VBA)
La clase Border representa el borde de un objeto. Para usar una variable de clase Border, primero debe ser instanciado, por ejemplo
Dim brd as Border
Set brd = ActiveCell.BorderAround()
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
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. Posibles valores de retorno son xlColorIndexAutomatic - Color automático, xlColorIndexNone - Sin 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.BorderAround.ColorIndex = xlColorIndexAutomatic
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.
xlDouble y xlSlantDashDot no se aplican a los gráficos.
ActiveCell.BorderAround.LineStyle = xlContinuous
ThemeColor
Devuelve o establece el color del tema de la combinación de colores aplicada que está asociada con el objeto especificado. Aquí puede ver valores posibles para
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.BorderAround.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 inferior a-1 o superior a 1, se producirá el siguiente error en tiempo de ejecución: "el valor especificado está fuera del intervalo".
ActiveCell.BorderAround.TintAndShade =
Weight
Devuelve o establece un valor de tipo XlBorderWeight que representa el grosor del borde. Posibles valores de retorno son xlHairline - Fino (borde más delgado), xlMedium - Mediano, xlThick - Grueso (borde más grueso), xlThin - Pequeñas.
ActiveCell.BorderAround.Weight = xlMedium