Canvio de color segun valor en un formulario. VBA Excel
Quiero realizar una señal visual para saber en todo momento el estado de un envio.
If tipologia_final.Caption = "OASF" Then If diferencia_dies.Caption <= "30" Then diferencia_dies.ForeColor = RGB(255, 0, 0)'Rojo ElseIf diferencia_dies.Caption >= "31" Then diferencia_dies.ForeColor = RGB(255, 128, 0)'Naranja ElseIf diferencia_dies.Caption >= "61" Then diferencia_dies.ForeColor = RGB(0, 0, 0)'Negro End If End If
tipologia_final.Caption: es este campo se muestra una tipologia comun a muchas empresas que tiene unas mismas condiciones. En el caso que he pasado la tipologia es "OASF".
diferencia_dies. Caption: muestra la direncia de dias del ultimo pedido a hoy
Lo que me gustaria hacer es que si la diferencia de dias es inferior a 30 dias salga en color ROJO, del dia 31 al dia 60 que salga en NARANJA y a partir del dia 60 que salga en NEGRO.
¿Cuál es mi error?
1 Respuesta
Respuesta de Elsa Matilde
1
Respuesta enviada en esta entrada:
Cambiar el color en un label (semaforo). Excel VBA
Sdos y no olvides valorar las respuestas.
Elsa
