Новости:

Интересные и полезные статьи по работе с Excel и VBA
можно найти в разделе ХИТРОСТИ

Главное меню

Рассылка через Outlook из Excel

Автор Voldemar1973, 02.02.2018, 16:53:14

« назад - далее »

Voldemar1973

Привет форумчане!

Помогите решить  проблему отправки писем через Outlook,  используя макрос в таблице Excel, по работе прямо очень, очень нужно.
 Для начала прошу прощения, эту тему уже наверняка уже обсуждали, но я так и не нашел именно то, что мне нужно. Вообщем, смысл задачи такой.  В таблице Excel имеются четыре столбца:  

1.  Адреса e-mail ( у меня порядка 100 получателей)
2.  Тема сообщения.
3   Путь к файлу ( я делаю шаблон письма в Outlook и сохраняю его в отдельной папке. Расширение файла .oft)
4.  Путь к файлу вложению.  Было бы классно, если бы выдававалось еще какое-нибудь сообщение об ошибке отправки, но это в принципе, думаю,  не так важно.  

В приложении excel файл с этими полями, буду очень признателен, если сможете помочь.
Заранее спасибо!!! :-)

Дмитрий Щербаков(The_Prist)

#1
Добрый день.
А чем помочь? Тут больше на ТЗ похоже, чем на помощь. Не видно, чтобы Вы сами хоть как-то попытались сделать что-то самостоятельно. Например, построить под себя код из статьи: Как отправить письмо из Excel?
Единственное, для создания письма из своего шаблона надо будет вместо строки:
Set objMail = objOutlookApp.CreateItem(0)   'создаем новое сообщение
применить такую:
Set objMail = objOutlookApp.CreateItemFromTemplate(Cells(lr, 3).Value) 'создаем письмо из шаблона, полный путь к которому записан в ячейке третьего столбца
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...

Яндекс.Метрика Рейтинг@Mail.ru