Lista de códigos de índice de cores VBA
Ao usar o VBA para codificar o Colorindex (ou cor de fundo) de uma célula, é útil saber qual número inteiro será igual a qual cor. Abaixo está uma imagem de referência que mostra a cor e lista seu respectivo Colorindex. também conhecido como Paleta de cores VBA

Este é o código para fazer um para você, ou apenas adicione esta página aos favoritos:
123456789101112131415 | Sub ColorRef ()Dim x As IntegerPara x = 1 a 56Se x <entãoCélulas (x, 1) .Interior.ColorIndex = xCélulas (x, 2) = xOutroCélulas (x - 28, 3) .Interior.ColorIndex = xCélulas (x - 28, 4) = xFim sePróximo xEnd Sub |
Exemplos VBA ColorIndex
Definir cor de fundo da célula
1 | Intervalo ("A1"). Interior.ColorIndex = 6 |
Definir cor da fonte da célula
1 | Intervalo ("A1"). Font.ColorIndex = 5 |
Definir a cor das bordas da célula
1 | Intervalo ("A1"). Borders.ColorIndex = 5 |
Obter Cell Background ColorIndex
123 | Dim col como inteirocol = Range ("A1"). Interior.ColorIndex |
Definir a cor de fundo de uma célula para a cor de outra célula
1 | Intervalo ("A1"). Interior.ColorIndex = Intervalo ("B1"). Interior.ColorIndex |
Propriedade de cor VBA
Em vez de usar a propriedade ColorIndex do Excel / VBA, você pode usar a propriedade Color. A propriedade Color aceita dois tipos de entrada:
- vbColor
- Cores RGB
Vamos discutir isso abaixo:
VB Color
VB Color é a maneira mais fácil de definir cores em VBA. No entanto, também é o menos flexível. Para definir um código de cor usando vbColor, use a tabela abaixo:

No entanto, como você pode ver na tabela, suas opções são extremamente limitadas.
Definir cor de fundo da célula
1 | Intervalo ("A1"). Interior.Cor = vbAmarelo |
Definir cor da fonte da célula
1 | Intervalo ("A1"). Font.Color = vbBlue |
Definir a cor das bordas da célula
1 | Intervalo ("A1"). Borders.Color = vbRed |
Definir a cor de fundo de uma célula para a cor de outra célula
1 | Intervalo ("A1"). Interior.Cor = Intervalo ("B1"). Interior.Cor |
Cores RGB
RGB significa Vermelho Verde Azul. Essas são as três cores primárias que podem ser combinadas para produzir qualquer outra cor. Ao inserir cores como RGB, insira um valor entre 0 e 255 para cada código de cor.
Aqui está um exemplo:
1 | Intervalo ("A1"). Interior.Color = RGB (255,255,0) |
Acima, definimos Vermelho = 255 (valor máximo), Verde = 255 (valor máximo) e Azul = 0 (valor mínimo). Isso define a cor de fundo da célula para amarelo.
Em vez disso, podemos definir a cor da fonte da célula para roxo:
1 | Intervalo ("A1"). Interior.Color = RGB (128,0,128) |
Existem inúmeras ferramentas online para encontrar o código RGB para a cor desejada (aqui está uma).
Lista de códigos ColorIndex e cores RGB no Access VBA
O Access usa formulários para exibir dados. Você pode usar os códigos ColorIndex para alterar programaticamente a cor de fundo e a cor de primeiro plano de objetos em seus formulários do Access.
12345 | Sub privado cmdSave_Click ()'altera a cor de fundo do botão Salvar quando o registro é salvo.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenEnd Sub |
