Outlook VBA көмегімен шаблоннан жаңа электрондық пошта хабарларын жасаудың 2 жылдам әдістері

Outlook шешімдері Қыркүйек 29, 2025
Қазір бөлісу:

Көптеген пайдаланушылар Outlook электрондық пошта шаблондарын табу және пайдалану қиын деп санайтындықтан, біз осы мақалада Outlook VBA бар шаблон арқылы жаңа электрондық пошта хабарларын жасаудың 2 жылдам әдісін ұсынамыз.

Көбінесе, Outlook электрондық пошта үлгісін пайдалану үшін алдымен оны «Жаңа элементтер» > «Қосымша элементтер» > «Пішінді таңдау» тармақтарын басу арқылы білу керек. Содан кейін «Пішінді таңдау» диалогтық терезесінде келесі скриншоттағыдай «Файл жүйесіндегі пайдаланушы үлгілері» бөлімінде мақсатты үлгілерді тауып, ашыңыз.

Пішінді таңдаңыз

Әрине, бұл өте алаңдатарлық. Сондықтан біз мұнда Outlook VBA көмегімен шаблондарды пайдаланып жаңа электрондық поштаны жылдам құра алатын 2 жылдам құралды енгіземіз. Оларды егжей-тегжейлі алу үшін оқыңыз.

1-әдіс: Жаңа электрондық пошта үлгісін Outlook VBA арқылы тікелей жасаңыз

  1. Алдымен Outlook бағдарламасының негізгі терезесіндегі «Әзірлеуші» қойындысына өтіңіз.
  2. Содан кейін жаңа терезе шығатын «Visual Basic» батырмасын басыңыз.
  3. Келесі, келесі 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

Outlook VBA арқылы жаңа электрондық пошта үлгісін жасаңыз

  1. Осыдан кейін «Visual Basic» терезесінен шығыңыз. Енді осы макросты жылдам қол жеткізу құралдар тақтасына қосу үшін төмендегі қадамдарды орындаңыз:
  • Алдымен жылдам қол жеткізу құралдар тақтасындағы төмен көрсеткіні нұқыңыз және «Қосымша командалар» тармағын таңдаңыз.
  • Содан кейін жаңа қалқымалы терезеде «Пәрмендерді таңдау» мен «Макростарды» орнатыңыз.
  • Осыдан кейін, дұрысын қойыңыз.
  • Содан кейін «Қосу» батырмасын басыңыз.Жаңа макро модульді жылдам қол жеткізу құралдар тақтасына қосыңыз
  • Кейіннен сіз оның сыртқы түрін өзгерте аласыз. «Өзгерту» батырмасын басыңыз. Жаңа диалог терезесінде оған жаңа атау беріңіз және оған белгішені көрсетіңіз.Жылдам қол жетімді құралдар тақтасында макро көріністі өзгертіңіз
  • Соңында екі «Жарайды» басыңыз.
  1. Соңында, жылдам қол жеткізу құралдар тақтасындағы макро белгішесін басуға болады. Дереу келесі сурет сияқты жаңа хабар терезесі пайда болады.Outlook VBA шаблонынан жаңа пошта

2-әдіс: Outlook VBA бар шаблоннан жаңа электрондық пошта жасау

  1. Біріншіден, сіздің қолыңызда дайын электрондық пошта үлгісі болуы керек. Қажетті форматтағы жаңа электрондық пошта жасаңыз, кеңсе тауарлары және Outlook шаблоны ретінде сақтаңыз. Толығырақ қадамдар үшін «мақаланы қараңыз.Outlook шаблондары арқылы жұмыс тиімділігін қалай арттыруға болады». Сонымен қатар, осы шаблон файлының сақталатын қалта жолын жазыңыз.
  2. Содан кейін «Visual Basic» терезесіне кіріп, 1-кеңес сияқты жаңа модуль ашыңыз.
  3. Кейіннен келесі скриншотты көшіріп, қою керек:
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

Outlook VBA бар шаблоннан жаңа электрондық пошта жасаңыз

  1. Осыдан кейін, жылдам қол жеткізу тақтасына жаңа макросты қосу үшін жоғарыдағы 5-кеңестің 1-қадамын орындаңыз.
  2. Ақыр соңында сіз көріңіз. Сізге төмендегі сурет сияқты шаблон арқылы жаңа электрондық пошта жіберіледі:Outlook VBA арқылы шаблоннан электрондық пошта

2 әдісті салыстыру

әдістері басымдық Қолайсыздық
1 әдісі Электрондық пошта шаблонын тікелей VBA кодтары бойынша жасауға болады. Сіз хабарламадағы мәтіндерді пішімдей алмайсыз.
2 әдісі Электрондық поштаға қажетті кеңсе құралдарын қолдануға және мәтіндерді форматтауға болады. Электрондық поштаның жаңа үлгісін алдын-ала жасау керек.

Кездейсоқ Outlook қателерімен күресу

Outlook мүмкіндіктері мол болғанымен, ол әлі де әртүрлі мәселелерге бейім. Сонымен қатар, ең мазасызы - пайдаланушылар Outlook бағдарламасын іске қоса алмайды. Жалпы, бұл келесі жағдайлардан туындауы мүмкін. бүлінген Outlook. Сонымен, сіз офистік жинақты жөндеу үшін «Басқару тақтасына» бара аласыз. Егер мәселе шешілмесе, тәжірибелі жөндеу құралына жүгінуіңіз керек, мысалы DataNumen Outlook Repair.

Автордың кіріспесі:

Ширли Чжан - деректерді қалпына келтіру бойынша сарапшы DataNumen, Соның ішінде деректерді қалпына келтіру технологиялары бойынша әлемдік көшбасшы болып табылатын Inc. жөндеу SQL Server МДФ және бағдарламалық жасақтаманы жөндеу бағдарламалары. Қосымша ақпарат алу үшін кіріңіз WWW.datanumen.com

Қазір бөлісу:

Пікірлер жабылды.