[Respuesta] Cómo enviar Correos masivos con Excel Fácil (usando macros)
Puede enviar correos electrónicos masivos a través de Excel utilizando una macro de VBA (Visual Basic for Applications) o una integración con un servicio de correo electrónico en línea como Outlook o Gmail. Aquí hay un ejemplo de código VBA para enviar email masivos a partir de una hoja de cálculo de Excel:
-
Abra la hoja de cálculo de Excel que contiene la lista de correos electrónicos y haga clic en "Archivo" -> "Editor de macros". Si no le aparece la opción de “Ver Macro”, utilice el buscador o la ayuda de su versión de Excel para ubicarlo.
-
Copie y pegue el siguiente código en el Editor de macros:
Sub SendEmails()
Dim rng As Range
Dim Row As Integer
Dim email As String
Dim subject As String
Dim body As StringSet rng = ThisWorkbook.Sheets("Sheet1").Range("A2:A6")
For Row = 1 To rng.Rows.Count
email = rng.Cells(Row, 1).Value
subject = "Asunto del correo electrónico"
body = "Cuerpo del correo electrónico"ThisWorkbook.SendMail email, subject, body
Next RowEnd Sub
-
En el código, reemplace "Sheet1" con el nombre de la hoja de cálculo que contiene la lista de correos electrónicos, reemplace "Asunto del correo electrónico" y "Cuerpo del correo electrónico" con el asunto y el cuerpo del correo electrónico que desea enviar y guarde la macro.
-
Ejecute la macro haciendo clic en "Ejecutar" en el Editor de macros.
Los correos electrónicos serán enviados a los destinatarios de la lista en la columna A de la hoja de cálculo.
[post_ad]![](https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjjJXMyilUEFzDnvkNdes-4JIOTluMXgu0hdZoY7cKJVxJxRgp2VBZXm36EpG4PpX4QUMNKq6NVlZFfdkZaeuvxQaSKa3RHfEj5zZvQY96GYAwEb4OVkRu0fMc_M-B8gSkw0ceVtYO6fWcl3kWsddmXDqVCfQLTAenWd8Fez6CQK_J6mlAFOqszXV1GEbs/s72-c/218ddf73-bb3d-4b20-baae-4a6d07aa5cd9.jpg)
No hay comentarios: