DANTE AMOR Macro que envíe email a varias Hojas del workbook al mismo tiempo a través de un aviso.
Resulta que he conseguido como enviar correos automáticos de acuerdo a un mensaje de aviso que sale en pantalla por una condición dada. En la columna G tengo una fecha de realizado el curso, en la columna F tengo esa fecha mas 365 días que es cuando le toca hacer el refrescamiento (es anual)
La condición viene dada asi según condicional: =(G4 - $B$2) > 30 lo marca en verde. (Donde B2 tiene la fecha de HOY()) la otra condición es similar pero <= 30 en amarillo y la otra < 15 en rojo.
Esta la macro de aviso evalúa fecha de hoy menos fecha actual es menor entonces si es menor que 30 entonces ejecuta la macro EnviarMail a los destinatarios previamente configurados.
El detalle ahora es que todo esto es trabajado sobre La Hoja 1 y quisiera hacer tablas IGUALES pero evaluando otros 2 cursos en la Hoja2 y en laHoja3.
Lo que no se como hacer es que con la misma macro, evaluar la hoja 2 y la hoja 3 y envíe correos de la misma forma pero con textos diferentes.
En concluidas cuentas lo que necesito es:
1. Poder evaluar dos cursos mas en la hoja2 y otro en la hoja3. Y que de igual forma al abrir el archivo evalúe las 3 hojas y todas las fechas en las 3 hojas y envíe mensajes correspondientes dependiendo de la tabla. En la hoja 1 evalúa curso A, en la hoja 2 evalúa curso B y en la hoja3 evalúa curso C. Necesito que los correos que envíe sean correctos: esta persona necesita realizar el curso B o C o A.
2. Lo otro que necesito hacer es que automáticamente cuando una persona en cualquiera de las 3 hojas este por debajo de los 15 días, le mande un correo al gerente general de la empresa junto con el definido y común supervisor de área, es decir, si una persona tiene menos de 15 días próximos a vencer su curso le diga al jefe mas jefe lo que sucede.
Muchas gracias.
