Classe ColorFormat - a cor de um objeto (Excel VBA)

A classe ColorFormat representa a cor de um objeto de uma só cor, a cor do ponteiro ou a cor de primeiro plano ou de plano de fundo de um objeto com um preenchimento gradual ou padronizado. Para usar uma variável de classe ColorFormat, ela primeiro precisa ser instanciada por exemplo

Brightness

Retorna ou define a luminosidade do objeto especificado. Leitura/gravação.

O valor dessa propriedade precisa ser um número de 0,0 (mais esmaecido) a 1,0 (mais brilhante).

ActiveSheet.Shapes(1).Fill.ForeColor.Brightness = 0.5

ObjectThemeColor

Retorna ou define uma cor que é mapeada para o esquema de cores do tema. Leitura/gravação MsoThemeColorIndex.

Dim cft As ColorFormat: Set cft = 
cft.ObjectThemeColor =

RGB

Retorna ou define um valor Long que representa o valor vermelho-verde-azul da cor especificada.

Dim cft As ColorFormat: Set cft = 
cft.RGB =

SchemeColor

Retorna ou define um valor Integer que representa a cor de um objeto Color, como um índice na cor atual.

Dim cft As ColorFormat: Set cft = 
cft.SchemeColor =

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.

Dim cft As ColorFormat: Set cft = 
cft.TintAndShade =

Type

Retorna um valor MsoColorType que representa o tipo de formato de cor.

Dim cft As ColorFormat: Set cft = 
Dim mctType As Office.MsoColorType
mctType = cft.Type