Formatos condicional

Elsa querida, perdona que te haga perder el tiempo pero necesito que me enseñes a aplicar más de 3 formatos condicionales en una hoja, como es para un torpe si es posible con algún ejemplo gracias.
Rafa..

1 respuesta

Respuesta
1
Esto no es posible sin macros. Como ya han pasado varios días de tu consulta, no sé si aún lo necesitas. Si es así y necesitas una rutina de ejemplo, avisame.
Por favor Elsa, te lo agradeceré toda mi vida si puedes mostrarme como hacerlo, ten en cuenta que necesitare utilizarlo en una buena parte de la hoja, no solo en una celda,
espero tu respuesta. Gracias
Te dejo un ejemplo donde se recorre un rango y según el valor de la celda se asigna un formato, está hecha para 4 opciones, pero podrás agregar las que necesites.
Sub VariosColores2()
'macro creada por Elsamatilde
Dim miRango As String
Dim celda
'podemos asignar un rango o seleccionarlo previamente
miRango = Range("A5:C50").Address(False, False)
Range(miRango).Select
'se hace mención a cada celda del rango seleccionado
For Each celda In Selection
If celda.Value < 0 Then
'Si el valor de la celda es menor que 0, el color de fuente de la celda será rojo
celda.Font.ColorIndex = 3
'Si el valor es menor a 20 el color será verde
ElseIf celda.Value < 20 Then
celda.Font.ColorIndex = 10
'Si el valor es menor a 100 el color será fucsia
ElseIf celda.Value < 100 Then
celda.Font.ColorIndex = 7
'Si el valor es >= 100 el color será azul
Else
celda.Font.ColorIndex = 5
End If
Next
End Sub
Esta es una de las que incluye mi manual 400Macros... no te pierdas las otras 399

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas