Formato Condicionado

15/07/2004 - 05:55 por Compumakro | Informe spam
Amigos
He hecho varios Ensayos y no he podido lograr que se cambie el color de la
fuente en una celda dependiendo de la palabra que se escriba en otra ("En
Servicio" o "Fuera de Servicio")

(Posible) Rango "D2:D500"

If Range("D2") = "En Servicio" then
Range("C2") = FontColorIndex = Azul
End If
If Range("D2") = "Fuera de Servicio" then
Range("C2") = FontColorIndex = Rojo
End If
End Sub

Gracias
Oscar
Barranquilla
 

Leer las respuestas

#1 Héctor Miguel
15/07/2004 - 07:12 | Informe spam
hola, Oscar !

... que se cambie el color de la fuente en una celda dependiendo de la palabra que se escriba en otra [...]
If Range("D2") = "En Servicio" then
Range("C2") = FontColorIndex = Azul
End If
If Range("D2") = "Fuera de Servicio" then
Range("C2") = FontColorIndex = Rojo
End If



If Range("d2") = "En Servicio" Then Range("c2").Font.ColorIndex = 5 ' <= azul '
If Range("d2") = "Fuera de Servicio" Then Range("c2").Font.ColorIndex = 3 ' <= rojo '

consulta la ayuda [en vba] para los valores de cada color [ColorIndex] de la paleta de colores de excel ;)
saludos,
hector.

p.d. [quizas] te 'convendria' usar los formatos condicionales en lugar de usar macros [???]

Preguntas similares