Полезная информация

Пользователи не любят читать документацию. Станьте оригинальным, будьте не как все. Ознакомьтесь с нашей базой знаний.

№103-04-2013 16:28:10

mmute
Участник
 
Группа: Members
Зарегистрирован: 03-04-2013
Сообщений: 1
UA: Firefox 19.0

Автоматичная отправка письма с помощью VBA

Добрый день всем. Пользовался поиском по форуму и ничего по поводу своей проблемы не нашел.
Для автоматичной отправки письма с помощью VBA использую код:

Sub SendEMail()
Dim FullStr As String
FullStr = "C:\Program Files\Mozilla Thunderbird\thunderbird.exe"
FullStr = FullStr & " -compose to=""name@gmail.com;name1@gmail.com"""
FullStr = FullStr & " ,subject=""Письмо"""
FullStr = FullStr & " ,body=""Письмо"""
FullStr = FullStr & " ,attachment=""file:///D:\1\1.xlsx"""
Shell FullStr, 1
End Sub

Способ очень хорош, но есть одна проблема: Невозможно отправить больше чем один файл.
Подскажите, есть ли метод отправлять через код больше чем один файл во вложении?

Отсутствует

 

Board footer

Powered by PunBB
Modified by Mozilla Russia
Copyright © 2004–2020 Mozilla Russia GitHub mark
Язык отображения форума: [Русский] [English]