2 szybkie metody tworzenia nowych wiadomości e-mail z szablonu za pomocą programu Outlook VBA

Ponieważ wielu użytkowników uważa, że ​​znajdowanie i używanie szablonów wiadomości e-mail programu Outlook jest kłopotliwe, w tym artykule przedstawimy 2 szybkie metody tworzenia nowych wiadomości e-mail przy użyciu szablonu z programem Outlook VBA.

Najczęściej, aby użyć szablonu wiadomości e-mail programu Outlook, musisz najpierw dowiedzieć się o tym, klikając „Nowe elementy”> „Więcej elementów”> „Wybierz formularz”. Następnie w oknie dialogowym „Wybierz formularz” znajdź i otwórz plik tarpobierz szablony w „Szablony użytkownika w systemie plików”, jak na poniższym zrzucie ekranu.

Oczywiście jest to rzeczywiście bardzo kłopotliwe. Dlatego tutaj przedstawimy 2 szybkie środki, które mogą szybko tworzyć nowe wiadomości e-mail za pomocą szablonów za pomocą programu Outlook VBA. Czytaj dalej, aby uzyskać szczegółowe informacje.

Metoda 1: Utwórz nowy szablon wiadomości e-mail bezpośrednio za pomocą programu Outlook VBA

1. Najpierw przejdź do zakładki „Deweloper” w głównym oknie Outlooka.
2. Następnie kliknij przycisk „Visual Basic”, co spowoduje wyświetlenie nowego okna.
3. Następnie skopiuj i wklej następujące kody VBA w module.

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

4. Następnie zamknij okno „Visual Basic”. Teraz wykonaj poniższe czynności, aby dodać to makro do paska narzędzi szybkiego dostępu:

• Najpierw kliknij strzałkę w dół na pasku narzędzi szybkiego dostępu i wybierz „Więcej poleceń”.
• Następnie w nowym oknie podręcznym ustaw „Wybierz polecenia z” na „Makra”.
• Następnie ustaw właściwy.
• Następnie kliknij przycisk „Dodaj”.
• Następnie możesz zmienić jego wygląd. Kliknij przycisk „Modyfikuj”. W nowym oknie dialogowym nadaj mu nową nazwę i określ dla niego ikonę.
• Na koniec kliknij dwa „OK”.

5. Na koniec możesz kliknąć ikonę makra na pasku narzędzi szybkiego dostępu. Natychmiast pojawi się nowe okno wiadomości, jak na poniższym obrazku.

Metoda 2: Utwórz nową wiadomość e-mail na podstawie istniejącego szablonu za pomocą programu Outlook VBA

1. Po pierwsze, powinieneś mieć pod ręką gotowy szablon wiadomości e-mail. Utwórz nową wiadomość e-mail w wybranym formacie, papeterii i zapisz ją jako szablon programu Outlook. Aby uzyskać szczegółowe instrukcje, zapoznaj się z artykułem „Jak poprawić wydajność pracy dzięki szablonom programu Outlook”. Zapisz również ścieżkę do folderu zapisu tego pliku szablonu.
2. Następnie przejdź do okna „Visual Basic” i otwórz nowy moduł, taki jak Tip 1.
3. Następnie należy skopiować i wkleić następujący zrzut ekranu:

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

4. Następnie wykonaj krok 5 w powyższej wskazówce 1, aby dodać nowe makro do paska narzędzi szybkiego dostępu.
5. W końcu możesz spróbować. Otrzymasz nowy e-mail za pomocą szablonu, jak na poniższym obrazku:

Porównanie 2 metod

Radzenie sobie ze sporadycznymi błędami Outlooka

Chociaż Outlook jest bogaty w funkcje, nadal jest podatny na różne problemy. Ponadto m. Inost irytujące jest to, że użytkownicy nie mogą start Outlook. Na ogół może to wystąpić z uszkodzony Outlook. Możesz więc przejść do „Panelu sterowania”, aby naprawić pakiet biurowy. Jeśli problem będzie się powtarzał, musisz skorzystać z doświadczonego narzędzia naprawczego, takiego jak DataNumen Outlook Repair.

Wprowadzenie autora:

Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym naprawa SQL Server MDF i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com