.
Una variante a de macro que emite aviso y envía mail, es macro que emite aviso y envía mail a varios destinatarios, como el título lo dice, la principal diferencia es que prácticamente realiza el mismo procedimiento que la macro presentada en el post actual, con la diferencia que se envía a varios destinatarios.
También en macro que envía mails se trató el tema sobre como enviar mail con Excel usando, Gmail, Hotmail o Yahoo, en dicho post había un listado de casillas de correo a las cuales había que enviarles un correo electrónico; para ello se usaba un bucle que recorre desde la fila inicial a la final, en cada recorrido envía un mails a los distintos destinatarios que están en la fila respectiva, es una Macro de Excel realizada en VBA que da solución a un sin numero de lectores que buscan poder enviar mails desde Excel.
El ejemplo de macro que aquí se muestra es bastante útil cuando se pretende que en el Libro de Excel, salga un AVISO sobre algún evento dependiendo de una fecha de realización o ejecución de determinada acción, básicamente esta Macro de Excel corre un formulario dando un AVISO y posteriormente ENVIANDO UN MAIL al destinatario del aviso, el cual se debe configurar en la respectiva función, tema que veremos antes de finalizar el post.
En el libro de Excel se tienen una serie de fechas, que representan la fecha límite para realizar una acción determinada, la columna F tiene la fecha de realización de la tarea mencionada; en la columna B se encuentran los ID de los equipos y es la columna donde la macro se fija recorre hasta la última fila con datos, por ello es importante que no esté vacía ya que de lo contrario la macro se detiene.
Al abrir el libro de Excel primero se ejecuta un procedimiento de VBA que se encuentra en ThisWorkbook, está línea de código llama a otro procedimiento que se encuentra en el Módulo AvisoMail, el cual determina en cada fila si la fecha de la columna F, es igual o anterior a la fecha del sistema; en caso que la respuesta sea Verdadera; procede a mostrar el UserForm3, cuya programación interna consiste en que el formulario esté 2 segundos y se cierre solo, posterior a ello se llama la función que envía mails desde Excel, esto se hace con cada una de las filas que contenga datos del departamento en cuestión.
Es necesario hacer algunas consideraciones sobre la configuración de la PC; primero, para que funcione, el envío de mails, se debe agregar una referencia en el Editor de Visual Basic que es Microsoft CDO for Windows 2000 Library, haciendo click en la imagen siguiente, se podrá observar con más lujos de detalle, la referencia que se debe agregar para que se puedan envíar mails desde Excel.
Bien configurado esto, viene el otro paso para que se puedan enviar mails con Excel y no salte error; la función que envía mail está por defecto configurada para Gmail, no obstante se agrega en forma de comentario ( ‘ apostrofe), el servidor Smtp de Yahoo y Hotmail, que son los correos más populares, si no se tiene estos correos, se puede probar con otros y configurar servidor Smtp y el puerto de salida, lo cual dejaría enviar mails y no daría errores.
El servidor Smtp de Google es «smtp.gmail.com»; el de Hotmail es «smtp.live.com» y el de Yahoo es: «out.izymail.com»; en el caso que se tuviera una modificación, se debe buscar en google cual es el servidor smpt y puerto del correo que estemos usando.
MASTERCARD PAYONEER |
Una vez finalizado el paso anterior, se deben realizar otras modificaciones y de esta manera estar condiciones de enviar mails, se debe colocar el nombre de usuario y clave del correo que envía los mails; como así también cual es el mail de origen, cual el de destino. Seguidamente se muestra los códigos utilizados.
Para finalizar con el desarrollo y en el caso que no tengas conocimiento suficiente sobre el manejo de hojas de Excel, te recomiendo antes de introducirte en el mundo de las macros, que leas un excelente libro sobre Excel el que te ayudará manejar las planillas de cálculo, debes hacer click acá, si quieres un libro sobre Excel, en inglés, entonces debes hacer click acá.
Private Sub Workbook_Open()
Call Aviso
End Sub
Código que se inserta en un módulo
Otros post de utilidad:
Busca un dato en todas las hojas de excel
Combobox incrustado en Excel
Formulario para insertar datos en hoja de excel
Tutoriales sobre VBA
Llenar combobox y buscar datos
Mensaje de Alerta y envío de mail con Excel
Combobox que lista hojas de excel y las selecciona
.
If this post was helpful INVITE ME A COFFEE and so help keep up the page, CLICK to download free example.
Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends