Láttuk a VBA-t az excel programban, és hogyan automatizáljuk feladatainkat az excelben a makrók létrehozásával, a Microsoft Outlookban van egy referenciánk a VBA-ra is, amelynek használatával a VBA használatával vezérelhetjük a kilátásokat, ez megkönnyíti az outlookban megismételt feladataink automatizálását, és Az excelhez hasonlóan lehetővé kell tennünk a fejlesztői funkció számára, hogy a VBA-t outlookban használja.
VBA Outlook
A VBA szépsége, hogy hivatkozhatunk más Microsoft objektumokra, mint például a PowerPoint, a Word és az Outlook. Gyönyörű előadásokat készíthetünk. Dolgozhatunk a Microsoft Word dokumentummal, végül elküldhetjük az e-maileket is. Igen, jól hallottad. Küldhetünk e-maileket magától az Excel-től. Ez kínosan hangzik, ugyanakkor mosolyt csal az arcunkra is. Ebben a cikkben megmutatom, hogyan kell működni a Microsoft Outlook objektummal az Excelből a VBA kódolással. Olvass tovább…
Hogyan hivatkozhatunk az Outlook programra az Excel programból?
Ne feledje, hogy az Outlook egy objektum, és meg kell adnunk erre a hivatkozást az objektum-referencia könyvtárban. Az Outlook objektum hivatkozásra állításához kövesse az alábbi lépéseket.
1. lépés: Nyissa meg a Visual Basic Editor alkalmazást.
2. lépés: Válassza az Eszközök> Referencia lehetőséget.
3. lépés: Az alábbi hivatkozásokban, az objektumkönyvtárban görgessen lefelé, és válassza a „MICROSOFT OUTLOOK 14.0 OBJECT LIBRARY” lehetőséget.
Jelölje be a „MICROSOFT OUTLOOK 14.0 OBJECT LIBRARY” jelölőnégyzetet, hogy elérhetővé váljon az Excel VBA számára.
Most az excelből férhetünk hozzá a VBA Outlook objektumhoz.
Írjon kódot e-mailek küldéséhez a VBA Outlook programból az Excel programból
Küldhetjük az e-maileket az exceltől az outlook alkalmazáson keresztül. Ehhez VBA kódokat kell írnunk. Kövesse az alábbi lépéseket az e-mailek küldéséhez az Outlookból.
1. lépés: Hozzon létre egy aleljárást.
Kód:
Opció Explicit Sub Send_Exails () End Sub
2. lépés: Határozza meg a változót VBA Outlook néven . Alkalmazás .
Kód:
Opció Explicit Sub Send_Exails () Dim OutlookApp mint Outlook.Application End Sub
3. lépés: A fenti változó hivatkozás a VBA Outlook alkalmazásra. A kilátásban e-maileket kell küldenünk, ezért határozzon meg egy másik változót Outlook.MailItem néven.
Kód:
Opció Explicit Sub Send_Exails () Dim OutlookApp mint Outlook. Alkalmazás Dim OutlookMail As Outlook.MailItem End Sub
4. lépés: Most mindkét változó objektumváltozó. Be kell állítanunk őket. Először állítsa be az „OutlookApp” változót Új Outlook.alkalmazásként .
Kód:
Sub Send_Exails () Dim OutlookApp mint Outlook. Alkalmazás Dim OutlookMail As Outlook.MailItem Set OutlookApp = New Outlook.Application End Sub
5. lépés: Most állítsa be a második változót, az „OutlookMail” -t az alábbiak szerint.
Állítsa be az OutlookMail = OutlookApp.CreateItem (olMailItem)
Kód:
Sub Send_Exails () Dim OutlookApp As Outlook. Alkalmazás Dim OutlookMail As Outlook.MailItem Set OutlookApp = New Outlook. Application Set OutlookMail = OutlookApp.CreateItem (olMailItem) End Sub
6. lépés: Mostantól a Nyilatkozati hozzáféréssel VBA Outlook Mail használatával.
Kód:
Sub Send_Exails () Dim OutlookApp mint Outlook. Alkalmazás Dim OutlookMail As Outlook.MailItem Set OutlookApp = New Outlook. Application Set OutlookMail = OutlookApp.CreateItem (olMailItem) With OutlookMail End End End Sub
Most már hozzáférhetünk az összes olyan elemhez, amely elérhető az e-mail elemekkel, például a „Body of the email”, „To”, „CC”, „BCC”, „Subject” és még sok más dolog.
7. lépés: Most a utasítással együtt egy ponttal láthatjuk az IntelliSense listát .
8. lépés: Először válassza ki a törzs formátumát olFormatHtml formátumban .
Kód:
Az OutlookMail segítségével .BodyFormat = olFormatHTML Vége
9. lépés: Most jelenítse meg az e-mailt.
Kód:
Az OutlookMail segítségével .BodyFormat = olFormatHTML .Display End With
10. lépés: Most be kell írnunk az e-mailt az e-mail törzsébe. Ehhez válassza a HtmlBody elemet .
Kód:
Az OutlookMail segítségével .BodyFormat = olFormatHTML .Display .HTMLBody = "Ide írja az e-mailt" Vége
Az alábbiakban bemutatjuk az e-mail írásának törzsét.
11. lépés: Az e-mail megírása után meg kell említenünk a vevő e-mail azonosítóját. Ehhez a hozzáféréshez: „ Címzett ”.
12. lépés: Ezután említést, akinek szeretne CC az e-mail.
Step 13: Now mention the BCC email ids,
Step 14: Next thing is we need to mention the subject for the email we are sending.
Step 15: Now add attachments. If you want to send the current workbook as an attachment, then use the attachment as This workbook.
Step 16: Finally, send the email by using the Send method.
Now, this code will send the email from your VBA outlook mail. Use the below VBA code to send emails from your outlook.
To use the below code, you must set the object reference to “MICROSOFT OUTLOOK 14.0 OBJECT LIBRARY” under the object library of Excel VBA.
By setting the reference to the object, the library is called early binding. The reason why we need to set the reference to object library because without setting the object library as “MICROSOFT OUTLOOK 14.0 OBJECT LIBRARY,” We cannot access the IntelliSense list of VBA properties and methods. This makes the writing of code difficult because you need to be sure of what you are writing in terms of technique and spellings.
Sub Send_Emails () 'Ez a kód korai kötésű, azaz az Eszközök> Referencia> Jelölte be a "MICROSOFT OUTLOOK 14.0 OBJECT LIBRARY" elemet CreateItem (olMailItem) Az OutlookMail alkalmazással .BodyFormat = olFormatHTML .Display .HTMLBody = "Kedves ABC" & "
" & "
" & "Kérjük, keresse meg a csatolt fájlt" & .HTMLBody 'utoljára .HTMLBody aláírást tartalmaz a kilátásból. A ''
sorok közötti töréseket tartalmaz két sor. Too "[email protected]" .CC = "[email protected]" .BCC = "[email protected]; [email protected]" .Subject = " Tesztüzenet ".Attachments = ThisWorkbook .Küldés vége End End-el
