Índice de cores VBA do Excel
Como em uma planilha, mudamos a cor de uma célula ou um determinado intervalo de células na guia inicial do VBA. Temos uma função vba chamada Índice de Cores que é usada para alterar as cores das células ou o intervalo de células fornecido, esta função tem identificação única para diferentes tipos de cores.
No VBA temos duas formas de aplicar a cor, a primeira é usando a propriedade “color” e a segunda usando a propriedade “ColorIndex”.
Aplicamos a cor à célula como cor de fundo, aplicamos a cor da fonte e aplicamos a cor da borda. Portanto, para acessar a propriedade de cor e índice de cor, precisamos primeiro selecionar a célula.
Como usar a propriedade de índice de cores e cores?
Você pode baixar este modelo de índice de cores VBA aqui - modelo de índice de cores VBA# 1 - Usando a propriedade de cor
Suponha que você tenha a palavra “Hello” na célula A1. Veremos como aplicar a cor de fundo desta célula.
Para alterar a cor de fundo, nas propriedades de cores, precisamos primeiro mencionar o intervalo da célula.
Código:
Sub Color () Range ("A1") End Sub 
Depois de selecionar a célula, precisamos mencionar o que precisamos fazer. Como eu disse, precisamos mudar a cor interna da célula. Portanto, para alterar a cor de fundo da célula use a propriedade “Interior”.
Código:
Intervalo de subcor () ("A1"). Interior End Sub 
Em Propriedade interior, temos vários outros métodos e propriedades. Uma vez que precisamos alterar a cor da célula, use a propriedade color.
Código:
Intervalo de subcor () ("A1"). Interior.Color = End Sub 
Aqui podemos usar 8 cores com nomes constantes. Abaixo está a lista dos mesmos.
vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhiteSelecione o tipo de cor conforme seu desejo.
Código:
Intervalo de subcor () ("A1"). Interior.Color = vbBlue End Sub 
Se eu executar este código usando a tecla F5 ou manualmente, ele mudará a cor de fundo da célula A1 para vbBlue.
Assim, você pode usar outras cores nomeadas constantes. Tente usá-los para testar o resultado.
Além dessas 8 cores constantes, também podemos preencher com cores diferentes usando a função RGB no VBA.
Código:
Intervalo de subcor () ("A1"). Interior.Color = RGB (End Sub 
Precisamos inserir a mistura de vermelho, verde e azul em números. Para usar isso, você deve ser perfeito ao inserir os números. Eu inseri a mistura como RGB (250, 200, 150).
Código:
Intervalo de subcor () ("A1"). Interior.Color = RGB (250, 200, 150) End Sub 
Mudança dessa cor é assim.
O problema aqui é que você não sabe exatamente qual número contém a cor.
O código abaixo é para mudar a cor da fonte.
Código:
Sub Color_Font () Intervalo ("A1"). Font.Color = RGB (100, 400, 100) End Sub 
Execute este código usando a tecla F5 ou manualmente para obter o resultado.
# 2 - Usando a propriedade de índice de cores
O índice de cores é ligeiramente diferente da propriedade de cor. Na propriedade COLOR usamos 8 cores constantes fornecidas pelo VBA e também usando a função RGB criamos nossa própria cor.
A propriedade COLOR INDEX é limitada no VBA, pode conter os valores de 1 a 56. Cada número de 1 a 56 contém cores diferentes. Abaixo estão os números da lista e suas respectivas cores.
Abaixo está o código de macro para alterar a cor de fundo da célula A1 para rosa.
Código:
Sub ColorIndex_Cell () Range ("A1"). Interior.ColorIndex = 26 End Sub 
Execute este código manualmente ou usando a tecla F5 para ver o resultado.
Abaixo está o código de macro para alterar a cor da fonte da célula A1 para amarelo.
Código:
Sub ColorIndex_Font () Range ("A1"). Font.ColorIndex = 27 End Sub 
Execute este código usando a tecla F5 ou você pode executar manualmente e ver o resultado.
Uma das coisas importantes a lembrar aqui é que podemos inserir números de 1 a 56. Se algo mais do que 56, obteremos o erro “Subscrito fora do intervalo”.
Você observou?
Como eu disse, a propriedade Color Index pode inserir apenas 56 cores, mas o fato é que ela pode inserir apenas 46 cores exclusivas e há 10 cores duplicadas. Abaixo está a lista de códigos de cores duplicados.
