Para poder asignar un color a una celda o auna fuente, tenemos la propiedad ColorIndex, la cual podrá recibir colores del 1 al 56.
Si queremos darle un color rojo a la celda activa usamos:
ActiveCell.Interior.ColorIndex = 3
Si queremos darle un color azul al fuente de la celda activa usamos:
ActiveCell.Font.ColorIndex = 5
Aunque también podemos utilizar la propiedad Color de la siguiente manera.
ActiveCell.Interior.Color = vbRed
Para la propiedad Color tenemos 8 constantes de color a utilizar sin necesidad de saber el índice del color.
