Hogyan lehet e-mailt küldeni az Outlookban VBA-val?

Frissítve: 2021. augusztus; A Microsoft Outlook 365 / 2019 / 2016 verzióra vonatkozik

Íme egy feljegyzés, amit egy olvasónktól kaptunk.

Köszönjük nagyon hasznos Outlook kódolási segítségét. Érdeklődnék, hogy megoszthat-e valamilyen kódot az e-mailek küldésének automatizálásához az Outlook programban? Tudom, hogy számos módja van az ismétlődő üzenetek küldésének, de kifejezetten érdekel, hogy a VBA-t használjam ehhez a feladatomhoz.

Köszönöm a kérdést. Úgy tűnik, hogy az e-mailek automatikus küldése a VBA használatával automatizálható leghasznosabb és legnépszerűbb feladatok közé tartozik. Olvassa el a további részleteket és egy egyszerű szkriptet a kezdéshez.

VBA írása Outlook e-mailek küldéséhez

Az alábbi meglehetősen egyszerű példában a következő lépéseket ismertetjük:

1. Először is a VBA Outlook objektummodellt használjuk egy új e-mail elem létrehozásához.
2. Ezután beállítjuk az üzenet fontosságát, a címzetteket (pontosvesszővel elválasztva), valamint a törzsszöveg stílusát és tartalmát.
3. Ezután megjelenítjük az üzenetet a Microsoft Outlook alkalmazásban.
4. Végül továbblépünk és elküldjük a címzetteknek.

Íme az egyszerű VBA-kód az egyszerű e-mailek automatikus létrehozásához és küldéséhez. Ne feledje, hogy ezt a szkriptet könnyen javítani kell, hogy tartalmazzon fájlmellékleteket, feladatokat stb.', de kezdjük egy nagyon egyszerű szkripttel.

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

Outlook VBA makró parancsikon

Érdemes lehet megvizsgálni az imént írt VBA-kód és az Outlook parancsgombjainak társítását. Ez lehetővé teszi, hogy egyszerűen elindítsa az Outlook szalagon elhelyezett parancsikonról.

Ezt a következőképpen teheti meg:

1. Először is nyissa meg a Microsoft Outlookot.
2. Nyomja meg a Fájl gombot, majd válassza az Opciók lehetőséget
3. Most lépjen tovább, és válassza a Szalag testreszabása lehetőséget.
4. A Szalag testreszabása részben megjelenik a Parancsok kiválasztása listából.
5. Válassza a Makrók lehetőséget
6. Ezután válassza ki az újonnan létrehozott VBA kódot, esetünkben a név SendMail legyen.
7. Ezután nyomja meg a Hozzáadás gombot, majd az OK gombot. Opcionálisan hozzárendelhet egy ikont a makrójához.
8. A makrója elérhető lesz az Outlook alkalmazás bal felső részén található Gyorselérési eszköztárban.

Lehetséges problémák a VBA makró beállításaival

Előfordulhat, hogy az Outlook makró beállításait módosítani kell a makrók futtatásához. Ha igen, a következőképpen teheti meg.