Observe que para establecer el color de la propiedad se utiliza la función RGB(Red, Green, Blue), los tres argumentos para esta función son valores del 0 a 255 que corresponden a la intensidad de los colores Rojo, Verde y Azul respectivamente.

Referenciar un rango de celdas.

Sólo tiene que cambiar a la forma Casilla_Inicial:Casilla_Final. Por ejemplo aplicar el último ejemplo al rango de casillas que va de la A1 a la A8, ponga.

Sub Segundo()

ActiveSheet.Range("A1:A8").Value = "Hola"

ActiveSheet.Range("A1:A8").Font.Bold = True

ActiveSheet.Range("A1:A8").Font.Color = RGB(255,0,0)

End Sub

Technorati Tags: