Как отправить письмо из MS Outlook макросом VBA? Программная отправка письма в Outlook

Подробности

Категория: Макросы Outlook

Опубликовано: 24 апреля 2013

Ниже приведен программный код макроса VBA для приложения Microsoft Outlook, позволяющий отправить электронное письмо. Кроме того при отправке сообщений из Outlook макросом можно столкнуться с появлением сообщения следующего содержания "Программа пытается автоматически отправить сообщение от вашего имени. Разрешить это действие? Возможно, это свидетельствует о наличии вируса, и следует выбрать ответ "Нет".

Если при отправке письма макросом, написанным для Outlook, появляется подобное уведомление, это значит, что макросом создается еще одна сессия командой Set objOL = New Outlook.Application

Если инициализация приложения будет проводиться в пределах одной сессии, то предупреждение системы безопасности появляться не будет.

Sub SendMail()

    Dim objOL As Outlook.Application

    Dim objMail As MailItem

    Set objOL = Outlook.Application

    Set objMail = objOL.CreateItem(olMailItem)

        With objMail

            .To = "здесь указывается адрес получателя письма"

            .CC = "здесь указывается адрес получателя копии"

            .Body = "Текст письма"               'указывается текст письма

            .Subject = "Тема письма"             'указывается тема письма

            .Attachments.Add "C:\out\test.txt"   'указывается полный путь к файлу

            .Send

        End With

    Set objMail = Nothing

    Set objOL = Nothing

End Sub

Для того, чтобы перенести этот программный код на свой компьютер, наведите курсор мыши на поле с программным кодом, нажмите на одну из двух кнопкок  в правом верхнем углу этого поля, скопируйте программный код и вставьте его в модуль проекта на своем компьютере (подробнее о том, как сохранить программный код макроса ).

Также, при помощи Microsoft Outlook, можно отправлять письма из приложения Excel .

Другие материалы по теме:

• Состав MS Office
• Что такое VBA? Что такое макросы VBA? Что такое надстройки?
• Создание и написание макросов. Как установить макрос на свой компьютер?
• Как записать макрос макрорекордером? Как запустить макрос в Word и Excel?
• Как сохранить программный код макроса? Что такое модули?