Imprimir página | Cerrar ventana

Aviso en celda con fecha de vencimiento.

Impreso de: Foro de Access y VBA
Categoría: Otros de Microsoft: Windows y Office
Nombre del foro: Excel
Descripción del foro: Foro de Excel y VBA de Excel
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=83473
Fecha de impresión: 15/Julio/2019 a las 22:11


Tema: Aviso en celda con fecha de vencimiento.
Publicado por: vimasaca
Asunto: Aviso en celda con fecha de vencimiento.
Fecha de publicación: 15/Febrero/2018 a las 08:42
Buenos días, de nuevo por aqui con dudas, ya hacia timepo que no me veia atascado.
En una hoja, tengo una celda con aviso en fecha de vencimiento =SI(HOY()+2=J29;"VENCIMIENTO";"") y me sale el aviso 2 días antes de la fecha, hasta aqui todo bien, pero el mismo día del vencimiento desaparece el aviso.
La ayuda que necesito de vosotros es la siguiente. Quiero que el aviso se mantenga el mismo día, y una vez vencido el vencimiento (osea, al día siguiente) se marcara en rojo y permaneciera por siempre, ¿se puede hacer?

Gracias y un saludo.


-------------
Gracias por la ayuda prestada.



Respuestas:
Publicado por: lalo1956
Fecha de publicación: 15/Febrero/2018 a las 17:30
Prueba así:

=SI(HOY()+2>=J29;"VENCIMIENTO";"")

Saludos! Smile


-------------
Quien no vive para servir, no sirve para vivir! http://www.mvp-access.com/foro/foroonline.htm -


Publicado por: AnSanVal
Fecha de publicación: 15/Febrero/2018 a las 22:01

Con 5 resultados para cuando faltan más de 2 días, 2días, 1 día, día vencimiento, o vencimiento pasado:

=SI(J29-2>HOY();"";ELEGIR(COINCIDIR(HOY()+3-J29;{1;3;4};1);"Vencimiento>" & J29-HOY();"Vencimiento";"<=Vencimiento"))




-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 16/Febrero/2018 a las 09:08
Publicado originalmente por lalo1956 lalo1956 escribió:

Prueba así:

=SI(HOY()+2>=J29;"VENCIMIENTO";"")

Saludos! Smile

Hola,
su propuesta no me sirve Cry.  Me avisa del vencimiento incluso en celdas que faltan 5 días para el vencimiento.
Gracias


-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 16/Febrero/2018 a las 09:28
Publicado originalmente por AnSanVal AnSanVal escribió:

Con 5 resultados para cuando faltan más de 2 días, 2días, 1 día, día vencimiento, o vencimiento pasado:

=SI(J29-2>HOY();"";ELEGIR(COINCIDIR(HOY()+3-J29;{1;3;4};1);"Vencimiento>" & J29-HOY();"Vencimiento";"<=Vencimiento"))



Hola,
creo que su propuesta no funciona. Adjunto imagen.



-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 16/Febrero/2018 a las 11:27

Tu imagen no indica que fórmula tienes en cada celda. Mi fórmula, tal cual la ofrecí (en modo literal) está pensada para 'leer' la celda [J29] para leer de otras celdas debe apuntar a la celda correspondiente.


Por ejemplo para la celda [K31] debe apuntar a J31:

=SI(J31-2>HOY();"";ELEGIR(COINCIDIR(HOY()+3-J31;{1;3;4};1);"Vencimiento>" & J31-HOY();"Vencimiento";"<=Vencimiento"))



Cuando ofrezco un aporte lo hago después de comprobarlo, seguramente algo no estás haciendo bien o... yo no he sabido entender tu requerimiento.





-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 16/Febrero/2018 a las 13:59
Hola,
disculpe no quise que le molestara mi comentario, provare de nuevo a ver que hago mal.

-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 16/Febrero/2018 a las 16:43
No, por supuesto que no me he sentido molesto por el comentario, que dicho sea de paso considero que fue dicho con respeto.

Si no te funciona (por la causa que sea) lo lógico es que lo digas. Puede ser por mal implementación de la fórmula, por error de sintaxis, por procedimiento inadecuado, o muchas otras causas, pero creo que nunca por intensión de que no funcione.

Tú te puedes equivocar y yo me puedo equivocar (aunque la pruebe), estamos aquí para aprender.

Saludos.





-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 19/Febrero/2018 a las 08:20
Buenos días AnSanVal,
SIIIIIIIIIIIIIIIIIIII, funciona Thumbs Up.
Mi error era copiar y pegar tu formula sin cambiar el nombre de las celdas (que burro fui).

Ahora para rematar lo ideal sería: vencimiento en rojo (vencido), y vencimiento en verde (por vencer).



-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 19/Febrero/2018 a las 12:05

Cada consulta debe ser en hilo aparte (Norma del foro), pero como tiene relación con el tema, te contestaré en este mismo hilo.


Resuelve con Formato condicional (aquí supongo que tu rango es [L26:L100] ).


=> L26:L100 (seleccionado) > Fórmula1: =L26="Vencimiento = hoy" (formato: color rojo)

=> L26:L100 (seleccionado) > Fórmula2: =O(L26="Vencimiento = 1 día";L26="Vencimiento = 2 días") (formato: color verde)





-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 20/Febrero/2018 a las 12:08
Hola Sr. AnSalVan,
voy a ello en ratos libres. Le dire cuando haya podido conseguirlo.


-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 20/Febrero/2018 a las 12:31
No se como utilizar su formual Unhappy.

Lo he tenido que hacer asi.
http://www.subirimagenes.com/fotos-01-9838266.html" rel="nofollow">



-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 20/Febrero/2018 a las 12:55
En tus imágenes no se ven números de filas ni letras de columnas, y tú no dices por escrito cual es el rango que quieres validar. Como comprenderás yo solo puedo ofrecerte las fórmulas con rangos ficticios, por eso te dije «... aquí supongo que tu rango es [L26:L100] ...».

Si no aportas los datos necesarios y no sabes (luego) adaptar a tu caso real... Confused ... aquí solo podemos ver hasta donde tú corras la cortina.



EDITADO: La imagen que aportes no tiene que ser del fichero original, que es el que contiene datos confidenciales.

En una hoja en blanco: replicas las fechas respetando rangos y pones tus celdas coloreadas como quieres que se vean. Fechas no son datos confidenciales, pero de cualquier modo las puedes cambiar de modo que se den los supuestos que persigues, y luego indica el rango real completo que quieres validar (las celdas a colorear).


-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 20/Febrero/2018 a las 13:32
Si claro, entendi bien su rango ficticio.
Mi rango a validar es: K2:K301.

Lo que si hay una cosa que me he dado cuenta ahora. Cuando la celda del la fecha de entrega esta vacia, me sale el aviso de vencido (<=Vencimiento). Para que no salga el aviso he de poner una fecha más lejana a los 3 días de aviso previo, por ejemplo 31-12-2018
http://www.subirimagenes.com/otros-01-9838280.html" rel="nofollow">



-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 20/Febrero/2018 a las 13:34
Publicado originalmente por AnSanVal AnSanVal escribió:

EDITADO: La imagen que aportes no tiene que ser del fichero original, que es el que contiene datos confidenciales.


Gracias, pero no se ven datos confidenciales.


EDITO: Tuve la precaución de borrarlos.


-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 20/Febrero/2018 a las 16:09
Hola Sr. AnSanVal,
aparte de tener la celda de entrega vacia y salir el aviso de vencido, he cambiado el texo a mostra sobre mi conveniencia y ha quedado así:
http://www.subirimagenes.com/otros-01-9838316.html" rel="nofollow">

-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 20/Febrero/2018 a las 18:57

1.- Para no mostrar mensaje en celdas sin fecha (p.e. J4:K4), cambia...

=SI(J2-2>HOY();"";ELEGIR(COINCIDIR(HOY()+3-J2;{1;3;4};1);"Vencimiento>" & J2-HOY();"Vencimiento";"<=Vencimiento"))

... por esta otra...

=SI(O(J2-2>HOY();J2="");"";ELEGIR(COINCIDIR(HOY()+3-J2;{1;3;4};1);"Vencimiento>" & J2-HOY();"Vencimiento";"<=Vencimiento"))


=>  EDITADO para modificar la fórmula (arriba 2ª), no vale la de la barra de fórmulas.



2.- ... para Formato condicional:

=> Selecciona  [K2:K301]

=> Inicio > Estilos > Formato condicional> Nueva regla > Utilice una fórmula que determine las celdas para aplicar formato > ...

     Fórmula:  =K2="Vencimiento"

     Formato:  Rojo     (fuente o fondo, como prefieras)

=> Inicio > Estilos > Formato condicional> Nueva regla > Utilice una fórmula que determine las celdas para aplicar formato > ...

     Fórmula:  =O(K2="Vencimiento>1";K2="Vencimiento>2")

     Formato:  Verde     (fuente o fondo, como prefieras)


Espero que con este paso a paso logres resolverlo.





Tú dices:  «... Gracias, pero no se ven datos confidenciales...»


Mi comentario fue debido a que no se ven datos confidenciales, ni no confidenciales, la calidad es malísima. Compara mis imágenes con las tuyas.


En tu último mensaje dices:  «... he cambiado el texto a mostrar sobre mi conveniencia y ha quedado así:»  pero yo (al estar 'pixelada' la imagen) no acierto a distinguir cual es tu nuevo texto, tú quizá logres intuirlo porque lo has visto ya en el original.


En tu adaptación del formato condicional, tendrás que modificar los textos (en azul) por tus nuevos textos.






-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 21/Febrero/2018 a las 07:24
Buenos días ante todo.
Que extraño Stern Smile lo de las imagenes. Si yo hago clic en la imagen se abre una nueva pestaña en el navegador donde esta alojada la imagen y se ve bien, ¿a usted no se le abre la dirección del alojamiento de la imagen?
Respecto al resto, lo probare Thumbs Up.

EDITO: Probare a insertar imagenes de otra forma.


-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 21/Febrero/2018 a las 11:17
¡Tienes razón!, la imagen se ve bien siguiendo el vínculo. No había probado así, solo ampliando la imagen del mensaje.

Si no logras hacer funcionar la fórmula ¡Coméntalo!. Lo mismo para el formato condicional.



-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 21/Febrero/2018 a las 13:12
Hola AnSanVal,
Bueno, creo que ya tengo todo como deseo. Adjunto imagen.

http://www.subirimagenes.com/otros-05-9838441.html" rel="nofollow">

Como podra comprobrar llevo años registrado y pocas dudas ó preguntas realizadas debido a que inteno siempre hacerlo yo mismo, hasta que me atasco.
Gracias a vosotros consegui crear en su día la tabla (en el mismo libro la podra ver, esta me costo más horas de dedicación) y ahora este asunto de la celda-vencimiento.

Un saludo y gracias. Handshake

EDITO: Hace días envíe un MP al administrador, no se cuantos admin hay regentando este foro pero esperare un par de días más a obtener una respuesta, de lo contrario se lo enviare a Ud.


-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 27/Febrero/2018 a las 08:46
Buenos día, retomo el tema.
Si quiero que me avise de los días que faltan para el vencimiento, bien sean 3, 4, 5, 6,...18, etc, ¿cual sería la formula?


-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 27/Febrero/2018 a las 11:46

¿No has pillado la sintaxis?   Voy con otra variable a ver si se te va quedando.


Fórmula:

[K2]   =ELEGIR(SI(J2<HOY();2-1*(J2="");3+1*(J2>HOY()));"";"Vencido";"Hoy vence";"Días para vencimiento "&J2-HOY())


Formato condicional:

fecha = hoy :    =K2="Hoy vence"

fecha > hoy :    =IZQUIERDA(K2;4) = "Días"





-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 27/Febrero/2018 a las 12:36
Publicado originalmente por AnSanVal AnSanVal escribió:

¿No has pillado la sintaxis?



Pues la verdad es que no.


Se que el = es para iniciar formula, el + suma, el - resta, el / divide, el * multiplica, pero del resto no tengo ni idea.

Tengo que buscar por la red un tutorial para saber la funcion de cada signo (  [ , ; . : / * + - ( " ) ] etc...  ) utilizado en las formulas, asi de esta manera saber interpretar.



-------------
Gracias por la ayuda prestada.


Publicado por: vimasaca
Fecha de publicación: 27/Febrero/2018 a las 13:40
Publicado originalmente por AnSanVal AnSanVal escribió:

¿No has pillado la sintaxis?   Voy con otra variable a ver si se te va quedando.


Fórmula:

[K2]   =ELEGIR(SI(J2<HOY();2-1*(J2="");3+1*(J2>HOY()));"";"Vencido";"Hoy vence";"Días para vencimiento "&J2-HOY())


Formato condicional:

fecha = hoy :    =K2="Hoy vence"

fecha > hoy :    =IZQUIERDA(K2;4) = "Días"




La formula es PERFECTA, Thumbs Up.
http://www.subirimagenes.com/otros-01-9839275.html" rel="nofollow">

 Ahora solo me queda lo comentado en mi anterior post.
EDITO: Añado imagen.


-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 27/Febrero/2018 a las 15:37
Publicado originalmente por AnSanVal AnSanVal escribió:

¿No has pillado la sintaxis?



«Pues la verdad es que no.»



Más tarde volveré y te explico una de ellas.






-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: AnSanVal
Fecha de publicación: 27/Febrero/2018 a las 18:53

Modifico la última fórmula. Intentando explicarla vi que estaba mal (no era 'tan perfecta'), aunque parecía funcional:

 =ELEGIR(2-1*(J2="")+1*(J2=HOY())+2*(J2>HOY());"";"Vencido";"Hoy vence";"Días para vencimiento "&J2-HOY())


Sintaxis de ELEGIR:    =ELEGIR(núm_índice; valor1; [valor2]; ...)      

                  Ejemplo:    =ELEGIR(2;"No apto";"Apto";"Notable")     Devuelve "Apto" (texto núm. 2).


Fórmula:   =ELEGIR(2-1*(J2="")+1*(J2=HOY())+2*(J2>HOY());"";"Vencido";"Hoy vence";"Días para vencimiento "&J2-HOY())


Supongamos que en J2 tenemos la fecha de hoy. 

=> verde1.- [2]

=> verde2.- [2] -1*(J2="")  si J2 estuviera vacía; se restarían 2-1=1  y devolvería el texto 1º (""), al no cumplirse permanece el [2].

=> verde3.-   [2]  +1*(J2=HOY())   esta si se cumple J2 = hoy por tanto se suman  2+1= [3] . ¡Solo puede cumplirse una!

=> verde4.-   [3]  +2*(J2>HOY()) no se cumple  J2 no es mayor que hoy por tanto permanece el [3] y devuelve el texto  ("Hoy vence")






-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.


Publicado por: vimasaca
Fecha de publicación: 23/Marzo/2018 a las 08:40
Buenos días.
Se me olvido darle las GRACIAS por la ayuda Wink


-------------
Gracias por la ayuda prestada.


Publicado por: AnSanVal
Fecha de publicación: 23/Marzo/2018 a las 11:15
Y a mi cerrar el hilo LOL, gracias también a ti por la retroalimentación. Vuelve cuando quieras.

-------------
Aprendemos viendo respuestas de otros, también intentando resolver dudas (intenta ayudar cuando puedas/sepas).

Mi http://achinet.mvp-access.es/" rel="nofollow - sitio_web con ejemplos Excel.



Imprimir página | Cerrar ventana