Outlook VBA-тай загвараас шинэ имэйл үүсгэх 2 хурдан арга

Outlook шийдлүүд Есдүгээр сарын 29, 2025

Олон хэрэглэгчид Outlook имэйлийн загварыг хайж олох нь төвөгтэй гэж боддог тул бид энэ нийтлэлд Outlook VBA-тай загвар ашиглан шинэ имэйл үүсгэх 2 хурдан аргыг танилцуулах болно.

Outlook имэйл загварыг ашиглахын тулд та эхлээд "Шинэ зүйлс" > "Бусад зүйлс" > "Маягт сонгох" дээр дарж үүнийг олж мэдэх хэрэгтэй. Дараа нь "Маягт сонгох" харилцах цонхонд дараах дэлгэцийн агшин шиг "Файлын систем дэх хэрэглэгчийн загварууд" дотроос зорилтот загваруудыг олж нээнэ үү.

Мэдээжийн хэрэг, энэ нь үнэхээр зовлонтой юм. Тиймээс энд Outlook VBA-ийн тусламжтайгаар загвар ашиглан шинэ имэйлийг хурдан үүсгэх боломжтой 2 хурдан хэрэгслийг танилцуулах болно. Тэдгээрийг нарийвчлан авахын тулд уншина уу.

Арга 1: Outlook VBA-ээр шууд имэйлийн шинэ загвар үүсгэх

Эхлээд Outlook-ийн үндсэн цонхонд "Хөгжүүлэгч" таб руу очно уу.
Дараа нь "Visual Basic" товчийг дарж шинэ цонх гарч ирнэ.
Дараа нь дараахь VBA кодыг хуулж аваад модульд буулгана уу.

Sub CreateNewMail()
    Dim obApp As Object
    Dim NewMail As MailItem
 
    Set obApp = Outlook.Application
    Set NewMail = obApp.CreateItem(olMailItem)
 
    'You can change the concrete info as per your needs
    With NewMail
         .Subject = Date & " Test Email"
         .To = "example@mail.com"
         .Body = "Dear Johnny," & vbCrLf & vbCrLf & "I'm glad to write this email to you .......... " & vbCrLf & vbCrLf & "This is just a test email template with Outlook VBA" & vbCrLf & vbCrLf & vbCrLf & "Yours Truly," & vbCrLf & vbCrLf & "John Smith"
         .Attachments.Add ("C:\Attachments\Test File.docx")
         .Importance = olImportanceHigh
         .Display
    End With
 
    Set obApp = Nothing
    Set NewMail = Nothing
End Sub

Үүний дараа "Visual Basic" цонхноос гарна уу. Одоо энэ макрог Quick Access Toolbar дээр нэмэхийн тулд доорх алхмуудыг дагана уу.

Эхлээд Quick Access Toolbar дээрх доошоо сумыг дараад "Илүү тушаал" -ыг сонгоно уу.
Дараа нь шинэ гарч ирэх цонхонд "Select command from" командыг "Macros" болгож тохируулна уу.
Үүний дараа зөвийг нь давирхайлаарай.
Дараа нь "Нэмэх" товчийг дарна уу.
Дараа нь та гадаад төрхийг нь өөрчилж болно. "Өөрчлөх" товчийг дарна уу. Шинэ харилцах цонхонд шинэ нэр өгөөд дүрсийг нь зааж өг.
Эцэст нь хоёр "OK" дээр дарна уу.

Эцэст нь та Quick Access Toolbar дээрх макро дүрс дээр дарж болно. Дараахь зураг шиг шинэ мессежийн цонх гарч ирнэ.

Арга 2: Outlook VBA-ийн одоо байгаа загвараас шинэ имэйл үүсгэх

Нэгдүгээрт, та бэлэн имэйлийн загварыг гартаа авах хэрэгтэй. Хүссэн формат, бичгийн хэрэгслээр шинэ имэйл үүсгээд Outlook загвар болгон хадгална уу. Дэлгэрэнгүй алхамуудыг “Нийтлэлээс авна уу.Outlook загваруудаар дамжуулан ажлын үр ашгаа хэрхэн сайжруулах вэ”. Мөн энэ загвар файлын хадгалах фолдерын замыг бичнэ үү.
Дараа нь “Visual Basic” цонхонд нэвтэрч Зөвлөгөө 1 шиг шинэ модулийг нээнэ үү.
Дараа нь та дараах скриншотыг хуулж буулгах хэрэгтэй.

Sub CreateEmailfromTemplate()
    Dim obApp As Application
    Dim NewMail As Outlook.MailItem
 
    Set obApp = Outlook.Application
    'Change the template file folder path according to your case
    Set NewMail = obApp.CreateItemFromTemplate("C:\Users\Test\Documents\Test Mail.oft")
    NewMail.Display
 
    Set obApp = Nothing
    Set NewMail = Nothing
End Sub

Үүний дараа дээр дурдсан Зөвлөмж 5-ийн 1-р алхамыг дагаж, хурдан нэвтрэх хэрэгслийн самбарт шинэ макро нэмнэ үү.
Эцэст нь та хичээгээд үзээрэй. Та доорх зураг шиг загварыг ашиглан шинэ имэйлийг авах болно.

2 аргыг харьцуулах

арга	давуу тал	Сул тал
Арга 1	Та имэйлийн загварыг шууд VBA кодоор үүсгэх боломжтой.	Та мессеж дэх текстүүдийг форматлах боломжгүй.
Арга 2	Та хүссэн бичгийн хэрэгслээ өргөж, имэйлийн текстийг форматлаж болно.	Та урьдчилан имэйлийн шинэ загвар үүсгэх хэрэгтэй.

Хэтийн төлөв гарах алдааг даван туулах

Outlook нь олон функцтэй хэдий ч янз бүрийн асуудалд өртөмтгий хэвээр байна. Түүнээс гадна хамгийн төвөгтэй нь хэрэглэгчид Outlook-г эхлүүлж чадахгүй байгаа явдал юм. Ерөнхийдөө энэ нь дараахаас үүсч болно. гэмтсэн Outlook. Тиймээс та оффисын багцыг засахын тулд 'Хяналтын самбар' руу орж болно. Хэрэв асуудал хэвээр байвал та туршлагатай засварын хэрэгсэлд хандах хэрэгтэй DataNumen Outlook Repair.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. засвар SQL Server mdf програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com