Anónimo
Generar mensaje de alarma
Hola, soy nvo en esto, y me metí en un pantano...
Estoy trabajando con un listado en donde poseo una columna con valores de fecha de vencimiento de un material entregado el cual lo quiero contrastar con la fecha actual, y si la diferencia es menor a 60 días me cuente la cantidad de filas y las resuma en un mensaje de alarma de excel.
Saludos
Luis
Estoy trabajando con un listado en donde poseo una columna con valores de fecha de vencimiento de un material entregado el cual lo quiero contrastar con la fecha actual, y si la diferencia es menor a 60 días me cuente la cantidad de filas y las resuma en un mensaje de alarma de excel.
Saludos
Luis
1 respuesta
Respuesta
1
Supongamos que enla celda c1 hasta la c50 tienes las fechas de vencimientos
en la celda d1 pon
supongamos que el valor de la c1 es 15-05-2010
en la celda d1 pon =si(c1-hoy()<60,1,) te dara como resultado 30
este valor te pondra en la 1
supongamos que en la d2 te dio como resultado 0
y en la d3 1
es decir en todas la celda donde al valos sea menor a 60 te pondra 1 y en las demas 0 o nada
ahora en la celda z1 pon
=contar.si(d1:d50,1)
Para el caso anteriores te dará dos porque dentro del rango d1:d50 solo 2 son igual a 1
para que te mande la alerta debes entrar al editor de Visual Basic y en la pestaña de esa hoja pon en el evento al Activar Hoja
MsgBox("hay "&Range("z1")&" con el numero 1")
El cuadro del mensaje dirá
Hay 2 clientes con el numero 1
en la celda d1 pon
supongamos que el valor de la c1 es 15-05-2010
en la celda d1 pon =si(c1-hoy()<60,1,) te dara como resultado 30
este valor te pondra en la 1
supongamos que en la d2 te dio como resultado 0
y en la d3 1
es decir en todas la celda donde al valos sea menor a 60 te pondra 1 y en las demas 0 o nada
ahora en la celda z1 pon
=contar.si(d1:d50,1)
Para el caso anteriores te dará dos porque dentro del rango d1:d50 solo 2 son igual a 1
para que te mande la alerta debes entrar al editor de Visual Basic y en la pestaña de esa hoja pon en el evento al Activar Hoja
MsgBox("hay "&Range("z1")&" con el numero 1")
El cuadro del mensaje dirá
Hay 2 clientes con el numero 1