2 Швидкі методи створення нових електронних листів із шаблону за допомогою Outlook VBA

Рішення для Outlook Вересень 29, 2025

Оскільки багато користувачів вважають громіздким пошук і використання шаблонів електронної пошти Outlook, у цій статті ми продемонструємо 2 швидких способи створення нових електронних листів за допомогою шаблону з Outlook VBA.

Найчастіше, щоб скористатися шаблоном електронної пошти Outlook, спочатку потрібно знайти його, натиснувши «Нові елементи» > «Інші елементи» > «Вибрати форму». Потім у діалоговому вікні «Вибрати форму» знайдіть і відкрийте цільові шаблони в «Шаблони користувачів у файловій системі», як на наступному знімку екрана.

Очевидно, це справді дуже клопітно. Тому тут ми представимо 2 швидких способи, за допомогою яких можна швидко створювати нові електронні листи за допомогою шаблонів за допомогою Outlook VBA. Читайте далі, щоб отримати їх детально.

Спосіб 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”. Тепер виконайте наведені нижче дії, щоб додати цей макрос на панель швидкого доступу:

Спочатку клацніть стрілку вниз на панелі швидкого доступу та виберіть «Інші команди».
Потім у новому спливаючому вікні встановіть “Вибрати команди з” на “Макроси”.
Після цього подайте на правильний.
Потім натисніть кнопку «Додати».
Згодом ви можете змінити його зовнішній вигляд. Натисніть кнопку «Змінити». У новому діалоговому вікні дайте йому нове ім’я та вкажіть піктограму для нього.
Нарешті, натисніть два "OK".

Нарешті, ви можете натиснути на піктограму макросу на панелі швидкого доступу. Одразу з’явиться нове вікно повідомлення, як на малюнку нижче.

Спосіб 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. Загалом, це може статися з пошкоджений Outlook. Тож ви можете перейти до «Панелі управління», щоб відремонтувати офісний пакет. Якщо проблема не зникне, вам доведеться звернутися до досвідченого інструменту ремонту, наприклад DataNumen Outlook Repair.

Вступ автора:

Ширлі Чжан - експерт із відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі ремонт SQL Server MdF та перспективні програмні продукти для ремонту. Для отримання додаткової інформації відвідайте WWW.datanumen.com