Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Почтовая рассылка с Вложением, рассылка списка
 
Необходимо отправить по списку рассылку писем со вложением.
Использую 2013, Сливание все проходит идеально письма готовы к отправке , но ни как не могу добавить вложение к каждому из адресатов.Если только отдельно письмо,письмо "ручками" .... не дело.
В форуме нашем вот такое объяснение ( снимок , идеальное по моему мнению ) , но как выйти  на него не как не могу понять.
Объясните путь создание рассылки со вложением.
Благодарю!

http://www.planetaexcel.ru/plex/plex-features.php#mail
 
Код
Sub mailing_OPER()
    Dim OutApp As Object
    Dim OutMail As Object
    Dim cell As Range
    Dim asTo, asSubject, asBody, asAttachment

    Application.ScreenUpdating = False
    Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon

    asTo = Range("B2:B36").Value
    asSubject = Range("C2:C36").Value
    asBody = Range("D2:D36").Value
    asAttachment = Range("E2:E36").Value

    For i = 1 To UBound(asTo, 1)
        Set OutMail = OutApp.CreateItem(0)
        On Error Resume Next
        With OutMail
            .To = asTo(i, 1)
            .Subject = asSubject(i, 1)
            .body = asBody(i, 1)
            .Attachments.Add asAttachment(i, 1)
            .Send 'Display
        End With
        On Error GoTo 0
        Set OutMail = Nothing
    Next i

cleanup:
    Set OutApp = Nothing
    Application.ScreenUpdating = True
End Sub
Изменено: googlogmob - 19 Мар 2015 12:06:45
 
Добавил...... но отправка не получается все равно......
просьба Гур excel объяснить пошагова  как.....
 
Цитата
но отправка не получается все равно......
что конкретно не получается?
если в 5 столбце находятся полные пути к файлам - они будут прикреплены к письмам:
asAttachment = Range("E2:E36").Value

а если надо готовое решение для рассылки, - можете здесь посмотреть:
http://excelvba.ru/programmes/FillDocuments
Письма формируется по шаблону, можно прикреплять разные файлы (в т.ч. и заполненные по шаблону), рассылка выполняется через Outlook или TheBAT
Страницы: 1
Читают тему (гостей: 1)