Я пытаюсь отправить электронные письма навалом (и я думал, что Excel будет хорошим вариантом для этого). В основном пытается скрепить файл Excel на адрес электронной почты и автоматически заполнить 3 или 4 пробела. Например: Hello [Insert cell A1] blah blah blah [Вставить ячейку B1].Связывание Excel с электронной почтой. Отправить массовые электронные письма
Просто хотел узнать, с чего начать. (Я понимаю, что это потребует некоторого VBA)
Вот основной шаблон, который можно использовать:
Option Explicit
Dim IE As Object
Sub Send_Email()
Dim eSubject, eTo, eBody As String
Dim Mail_Object, Mail_Single As Variant
eSubject = "Example of how to send email using VBA"
eTo = "[email protected]"
Dim sht As Worksheet
Set sht = Sheets("Sheet1")
With sht:
eBody = "Hello " & .Cells(1, "A").value & " blah blah blah " & .Cells(1, "B").value
End With
On Error GoTo debugHere
Set Mail_Object = CreateObject("Outlook.Application")
Set Mail_Single = Mail_Object.CreateItem(0)
With Mail_Single
.Subject = eSubject
.To = eTo
.body = eBody
.send
End With
debugHere:
If Err.Description <> "" Then MsgBox Err.Description
End Sub
Чтобы отправить несколько писем с помощью этого шаблона все, что вам сделать, это поместить цикл вокруг кода, который начинается с установкой Mail_Object и заканчивается концом с помощью инструкции.
Спасибо, я использовал шаблон в https://www.extendoffice.com/documents/excel/3560-excel-send-personalized-email.html Мне было интересно, если сам код VBA связан с моим прогнозом ? потому что он просто открывает веб-браузеры. –
Он работает через Outlook - по крайней мере, он настроен для этого на моей машине. Не знаю, как это будет работать с почтовыми клиентами, кроме Outlook. – Amorpheuses
Я думаю, что вы ищете что-то вроде этого.
Заканчивать блог Рон де Бруин в: http://www.rondebruin.nl/win/s1/outlook/mail.htm –
Почему бы не использовать слияния Microsoft Word в? Это будет намного легче для вас узнать, чем будет, если вы раньше не использовали VBA. Кроме того, VBA не упрощает отправку электронной почты с помощью VBA, где необходимо редактировать поля (по крайней мере, не по сравнению с слиянием по слову). –
https://www.extendoffice.com/documents/excel/3560-excel-send-personalized-email.html Эта ссылка описывает код VBA, который я использовал. По какой-то причине, когда я запускаю его, он просто открывает веб-браузеры вместо отправки писем через мой внешний вид. Я думаю, это потому, что это не связано с моим взглядом? –