Cambio de color de la barra de progreso según el resultado
MARJ
-
Exceltutofr -
Exceltutofr -
Hola,
He conseguido instalar una barra de progreso en mi celda de tabla de Excel a través de formatos condicionales.
Así que tengo una barra que progresa según si mi resultado es de 40 sobre 100 o de 75 sobre 100, etc.
Pero además me gustaría que esta barra sea roja cuando mi resultado esté entre 0 y 50. Luego que se vuelva verde cuando el resultado suba entre 51 y 100.
¿Cómo puedo hacerlo?
Gracias a quien pueda ayudarme y buen día a todos,
Configuración: Windows / Chrome 51.0.2704.103
He conseguido instalar una barra de progreso en mi celda de tabla de Excel a través de formatos condicionales.
Así que tengo una barra que progresa según si mi resultado es de 40 sobre 100 o de 75 sobre 100, etc.
Pero además me gustaría que esta barra sea roja cuando mi resultado esté entre 0 y 50. Luego que se vuelva verde cuando el resultado suba entre 51 y 100.
¿Cómo puedo hacerlo?
Gracias a quien pueda ayudarme y buen día a todos,
Configuración: Windows / Chrome 51.0.2704.103
2 respuestas
-
Hola
no creo que sea posible (-pero no lo sé todo); Todo lo que podemos imaginar es una barra de color "neutro" con un formato condicional complementario con el fondo de celda base en rojo que se vuelve verde si el valor <50, (o un formato condicional para verde y otro para rojo) pero eso solo permitirá identificar las celdas por debajo y por encima de la media sin cambiar el color de la barra.
Saludos cordiales
La calidad de la respuesta depende sobre todo de la claridad de la pregunta, ¡gracias! -
Hola,
es posible pero en VBA, ejemplo para tratar el rango A2:A50
clic derecho en la pestaña de tu hoja/Ver código, pega este código
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A2:A50")) Is Nothing Then
Target.FormatConditions.AddDatabar
With Target.FormatConditions(1)
.MinPoint.Modify newtype:=xlConditionValueNumber, newvalue:=0
.MaxPoint.Modify newtype:=xlConditionValueNumber, newvalue:=100
Select Case Target.Value
Case 0 To 50
.BarColor.Color = vbRed
Case 51 To 100
.BarColor.Color = vbGreen
End Select
End With
End If
End Sub
--
A+
Mike-31
Un período de fracaso es un momento soñado para sembrar las semillas del saber.