Како послати е-пошту у Оутлоок са ВБА?

Ажурирано: август 2021; Применљиво на Мицрософт Оутлоок 365 / 2019 / 2016

Ево белешке коју смо добили од читаоца.

Хвала вам на веома корисној помоћи код кодирања у програму Оутлоок. Питам се да ли можете да поделите неки код који ће вам помоћи да аутоматизујете слање е-поште у Оутлоок-у? Знам да постоји неколико начина за слање порука које се понављају, али посебно сам заинтересован да користим ВБА за свој овај задатак.

Хвала на питању. Чини се да је аутоматско слање е-поште међу најкориснијим и најпопуларнијим задацима које можете аутоматизовати користећи ВБА. Читајте даље за више детаља и једноставну скрипту за почетак овде.

Писање ВБА за слање Оутлоок е-поште

У прилично једноставном примеру испод, покрићемо следеће кораке:

1. Прво ћемо користити ВБА Оутлоок објектни модел да креирамо нову ставку е-поште.
2. Затим ћемо наставити и поставити важност поруке, примаоце (одвојене тачком и зарезом) и стил и садржај текста.
3. Затим ћемо приказати поруку у вашој Мицрософт Оутлоок апликацији.
4. На крају, ми ћемо га послати примаоцима.

Ево једноставног ВБА кода за аутоматско креирање и слање једноставних е-порука. Имајте на уму да морате лако да побољшате ову скрипту да бисте укључили прилоге датотека, задатке итд.', али хајде да почнемо са врло основном скриптом.

Sub SendMail()
Dim MyEmail As MailItem
Set MyEmail = Application.CreateItem(olMailItem)

With MyEmail
.To = ""
.Importance = olImportanceHigh
.Subject = ""
.Body = ""
.BodyFormat = olFormatHTML
.Display
End With

'I purposely commented the next line, uncomment it by removing the "'" sign to send your email.
' MyEmail.Send
End Sub

Оутлоок ВБА макро пречица

Можда бисте желели да погледате повезивање ВБА кода који сте управо написали са командним дугметом у Оутлоок-у. Ово ће вам омогућити да га лако покренете са пречице постављене на Оутлоок траци.

Ево како то учинити:

1. Прво, отворите Мицрософт Оутлоок.
2. Притисните Филе, а затим изаберите Опције
3. Сада наставите и изаберите Прилагоди траку.
4. У одељку Прилагоди траку приметићете оквир са листом Изаберите команде.
5. Изаберите Мацрос
6. Затим изаберите свој новокреирани ВБА код, у нашем случају име би требало да буде СендМаил.
7. Затим притисните Додај, а затим ОК. Опционо, можда ћете желети да доделите икону свом макроу.
8. Ваш макро ће бити доступан на траци са алаткама за брзи приступ у горњој левој страни ваше Оутлоок апликације.

Могући проблеми са поставкама ВБА макроа

Поставке макроа за Оутлоок ће можда морати да буду подешене да бисте покренули макрое. Ако је тако, ево како то учинити.