Kako poslati e-pošto v Outlooku z VBA?

Posodobljeno: avgust 2021; Velja za Microsoft Outlook 365 / 2019 / 2016

Tukaj je opomba, ki smo jo prejeli od bralca.

Hvala za vašo zelo uporabno Outlookovo pomoč pri kodiranju. Zanima me, ali lahko delite kodo za pomoč pri avtomatiziranju pošiljanja e-pošte v Outlooku? Vem, da obstaja več načinov za pošiljanje ponavljajočih se sporočil, vendar me posebej zanima uporaba VBA za to nalogo.

Hvala za vprašanje. Zdi se, da je samodejno pošiljanje e-pošte med najbolj uporabnimi in priljubljenimi nalogami, ki jih lahko avtomatizirate z VBA. Tukaj preberite več podrobnosti in preprost skript za začetek.

Pisanje VBA za pošiljanje e-pošte Outlook

V dokaj preprostem primeru spodaj bomo obravnavali naslednje korake:

1. Najprej bomo uporabili objektni model VBA Outlook, da ustvarimo nov e-poštni element.
2. Nato bomo nastavili pomembnost sporočila, prejemnike (ločeni s podpičji) ter slog in vsebino besedila.
3. Nato bomo sporočilo prikazali v vaši aplikaciji Microsoft Outlook.
4. Nazadnje ga bomo poslali prejemnikom.

Tukaj je preprosta koda VBA za samodejno ustvarjanje in pošiljanje preprostih e-poštnih sporočil. Upoštevajte, da morate ta skript preprosto izboljšati, tako da vključuje priloge datotek, naloge itd.', vendar začnimo z zelo osnovnim skriptom.

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

Bližnjica za makro Outlook VBA

Morda boste želeli preučiti povezavo kode VBA, ki ste jo pravkar napisali, z ukaznim gumbom v Outlooku. To vam bo omogočilo, da ga preprosto zaženete z bližnjice na Outlookovem traku.

To storite tako:

1. Najprej odprite Microsoft Outlook.
2. Pritisnite Datoteka in izberite Možnosti
3. Zdaj nadaljujte in izberite Prilagodi trak.
4. V razdelku Prilagajanje traku boste opazili polje s seznamom Izberite ukaze.
5. Izberite Makri
6. Nato izberite novo ustvarjeno kodo VBA, v našem primeru naj bo ime SendMail.
7. Nato pritisnite Dodaj in nato V redu. Po želji boste morda želeli svojemu makru dodeliti ikono.
8. Vaš makro bo na voljo v orodni vrstici za hitri dostop v zgornjem levem delu vaše Outlookove aplikacije.

Možne težave z nastavitvami makra VBA

Če želite zagnati makre, boste morda morali prilagoditi nastavitve makra v Outlooku. Če je tako, je opisano, kako to storiti.