Classe Borders (Excel VBA)

Uma coleção de quatro objetos Border que representam as quatro bordas de um objeto Range ou de estilo . Para usar uma variável de classe Borders, ela primeiro precisa ser instanciada por exemplo

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

For Each

Aqui está um exemplo de processamento dos itens Borders em uma coleção.

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

Color

Retorna ou define a cor principal do objeto, como mostra a tabela na seção de comentários. Use a função RGB para criar um valor de cor. de leitura/gravação.

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

ColorIndex

Retorna ou define um valor que representa a cor da borda. Os valores de retorno possíveis são xlColorIndexAutomatic - Cor automática, xlColorIndexNone - Sem cor.

Esta propriedade retornará NullNull se as quatro bordas não forem da mesma cor. A cor é especificada como um valor de índice na paleta de cores atual ou como uma das seguintes constantes XlColorIndex: xlColorIndexAutomatic ou xlColorIndexNone.

ActiveCell.DisplayFormat.Borders.ColorIndex =

Count

Retorna um valor Long que representa o número de objetos na coleção.

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

Item

Retorna um objeto Border que representa uma das bordas de um intervalo de células ou um estilo.

Item (Index)

Index: Pode ser uma das constantes XlBordersIndex .

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

LineStyle

Retorna ou define o estilo de linha da borda. Leitura/gravação XlLineStyle, xlGray25, xlGray50, xlGray75 ou xlAutomatic. Os valores de retorno possíveis são xlContinuous - Linha contínua, xlDash - Linha tracejada, xlDashDot - Traços e pontos alternados, xlDashDotDot - Traço seguido por dois pontos, xlDot - Linha pontilhada, xlDouble - Linha dupla, xlLineStyleNone - Sem linha, xlSlantDashDot - Traços inclinados.

ActiveCell.DisplayFormat.Borders.LineStyle = xlContinuous

ThemeColor

Retorna ou define a cor do tema no esquema de cores aplicado associado ao objeto especificado. de leitura/gravação.

A tentativa de acessar uma cor de tema para um objeto cuja cor não possui tema atualmente resultará em um erro em tempo de execução de solicitação inválida.

ActiveCell.DisplayFormat.Borders.ThemeColor =

TintAndShade

Retorna ou define um Single que clareia ou escurece uma cor.

É possível inserir um número de -1 (mais escuro) a 1 (mais claro) para a propriedade TintAndShade. Zero (0) é neutro. A tentativa de definir essa propriedade com um valor menor que-1 ou maior que 1 resulta em um erro de tempo de execução: "o valor especificado está fora do intervalo". Esta propriedade funciona para cores que sejam de tema ou não.

ActiveCell.DisplayFormat.Borders.TintAndShade =

Value

Sinônimo de Borders. LineStyle.

ActiveCell.DisplayFormat.Borders.Value =

Weight

Retorna ou define um valor XlBorderWeight que representa o peso da borda.

ActiveCell.DisplayFormat.Borders.Weight =