2 snabba metoder för att skapa nya e-postmeddelanden från en mall med Outlook VBA

Eftersom många användare tycker att det är besvärligt att hitta och använda Outlook-e-postmallar, kommer vi att visa två snabba metoder för att skapa nya e-postmeddelanden med en mall med Outlook VBA i den här artikeln.

För att använda en Outlook-e-postmall måste du oftast först ta reda på den genom att klicka på "Nya objekt" > "Fler objekt" > "Välj formulär". I dialogrutan "Välj formulär" letar du sedan upp och öppnar målmallarna i "Användarmallar i filsystemet", som i följande skärmdump.

Uppenbarligen är det verkligen besvärligt. Därför kommer vi här att introducera två snabba medel, som snabbt kan skapa ny e-post med hjälp av mallar med hjälp av Outlook VBA. Läs vidare för att få dem i detalj.

Metod 1: Skapa en ny e-postmall direkt av Outlook VBA

1. Först vänder du dig till fliken "Utvecklare" i huvudfönstret i Outlook.
2. Klicka sedan på “Visual Basic” -knappen, som visar ett nytt fönster.
3. Därefter kopierar och klistrar du in följande VBA-koder i en modul.

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. Stäng sedan fönstret “Visual Basic”. Följ stegen nedan för att lägga till detta makro i snabbåtkomstverktygsfältet:

• Först klickar du på nedåtpilen i verktygsfältet Snabbåtkomst och väljer "Fler kommandon".
• I det nya popup-fönstret ställer du sedan in "Välj kommandon från" till "Makron".
• Därefter slår du på rätt.
• Klicka sedan på knappen "Lägg till".
• Därefter kan du ändra dess utseende. Klicka på knappen "Ändra". I den nya dialogrutan, ge det ett nytt namn och ange en ikon för det.
• Slutligen klicka två “OK”.

5. Slutligen kan du klicka på makroikonen i snabbåtkomstverktygsfältet. Omedelbart kommer ett nytt meddelandefönster att dyka upp, som följande bild.

Metod 2: Skapa ett nytt e-postmeddelande från en befintlig mall av Outlook VBA

1. För det första bör du ha en färdig e-postmall i handen. Skapa ett nytt e-postmeddelande i önskat format, brevpapper och spara det som Outlook-mall. För detaljerade steg, se artikeln “Hur du förbättrar din arbetseffektivitet via Outlook-mallar”. Vänligen skriv ner sparar mappsökvägen för denna mallfil.
2. Gå sedan till "Visual Basic" -fönstret och öppna en ny modul som Tips 1.
3. Därefter bör du kopiera och klistra in följande skärmdump:

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. Därefter följer du steg 5 i ovanstående tips 1 för att lägga till det nya makrot i snabbåtkomstfältet.
5. Så småningom kan du prova. Du får det nya e-postmeddelandet med mallen, som bilden nedan:

Jämförelse av de 2 metoderna

Hantera tillfälliga Outlook-fel

Även om Outlook är fullt av funktioner är det fortfarande mottagligt för olika problem. Dessutom är det mest irriterande att användarna inte kan starta Outlook. Generellt sett kan det uppstå från skadad Outlook. Så du kan gå till "Kontrollpanelen" för att reparera kontorssviten. Om problemet kvarstår måste du använda ett erfaret reparationsverktyg, till exempel DataNumen Outlook Repair.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive reparation SQL Server MDF och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com