Transformando códigos de cores no VBA

Question

Eu tenho um monte de código em macro do Excel que inclui o seguinte padrão:

Sheet1.Cells(i, 1).Interior.ColorIndex = 4
Sheet1.Cells(j, 1).Interior.ColorIndex = 4

Como você pode ver, estou pintando algumas células com valor de cor 4 no meu código. Mas há apenas 56 cores na paleta de cores que eu posso usar. Eu gostaria de transformar o código para usar o formato RGB (R, G, B) que me permitirá usar mais de 56 cores.

Alguém sabe como transformar meu código corretamente? Obrigado ...

    

Answer 1

Para usar o RGB, você simplesmente usa

Sheet1.Cells(i, 1).Interior.Color = RGB(0,255,0)

Você pode revisar este site, que mostra o índice de cores, o HEX e o equivalente RGB de cada

link

Portanto, no exemplo acima, isso é o mesmo que Color.Index 4 (verde)