2 raske metoder for å lage nye e-poster fra en mal med Outlook VBA

Siden mange brukere synes det er tungvint å finne og bruke Outlook e-postmaler, vil vi vise 2 raske metoder for å lage nye e-poster ved å bruke en mal med Outlook VBA i denne artikkelen.

For å bruke en Outlook-e-postmal må du oftest finne ut av det ved å klikke på «Nye elementer» > «Flere elementer» > «Velg skjema». I dialogboksen «Velg skjema» finner og åpner du målmalene i «Brukermaler i filsystemet», som i skjermbildet nedenfor.

Det er klart at det er veldig plagsomt. Derfor vil vi her introdusere 2 raske midler, som raskt kan lage ny e-post ved hjelp av maler ved hjelp av Outlook VBA. Les videre for å få dem i detalj.

Metode 1: Lag en ny e-postmal direkte av Outlook VBA

1. Gå først til "Utvikler"-fanen i Outlook-hovedvinduet.
2. Klikk deretter på "Visual Basic"-knappen, som vil få frem et nytt vindu.
3. Deretter kopierer og limer du inn følgende 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. Deretter går du ut av "Visual Basic"-vinduet. Følg nå trinnene nedenfor for å legge til denne makroen til verktøylinjen for hurtigtilgang:

• Først klikker du på pil ned i verktøylinjen for hurtigtilgang og velger "Flere kommandoer".
• Sett deretter "Velg kommandoer fra" til "Makroer" i det nye popup-vinduet.
• Etter det, slå på den riktige.
• Klikk deretter på "Legg til"-knappen.
• Deretter kan du endre utseendet. Klikk på "Endre"-knappen. I den nye dialogboksen, gi den et nytt navn og spesifiser et ikon for den.
• Klikk til slutt to "OK".

5. Til slutt kan du klikke på makroikonet i hurtigtilgangsverktøylinjen. Umiddelbart vil et nytt meldingsvindu dukke opp, som det følgende bildet.

Metode 2: Opprett en ny e-post fra en eksisterende mal av Outlook VBA

1. For det første bør du ha en ferdig e-postmal i hånden. Opprett en ny e-post i ønsket format, skrivesaker og lagre den som Outlook-mal. For detaljerte trinn, se artikkelen "Slik forbedrer du arbeidseffektiviteten din via Outlook-maler". Skriv også ned lagringsmappebanen til denne malfilen.
2. Gå deretter til "Visual Basic"-vinduet og åpne en ny modul som Tips 1.
3. Deretter bør du kopiere og lime inn følgende skjermbilde:

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. Deretter følger du trinn 5 i tips 1 ovenfor for å legge til den nye makroen på verktøylinjen for hurtigtilgang.
5. Til slutt kan du prøve deg frem. Du vil motta den nye e-posten ved å bruke malen, som bildet nedenfor:

Sammenligning av de 2 metodene

Håndter sporadiske Outlook-feil

Selv om Outlook er funksjonsrikt, er det fortsatt utsatt for diverse problemer. Dessuten er det mest irriterende at brukerne ikke kan starte Outlook. Generelt kan det oppstå fra ødelagt Outlook. Så du kan gå til "Kontrollpanel" for å reparere kontorpakken. Hvis problemet vedvarer, må du bruke et erfarent reparasjonsverktøy, for eksempel DataNumen Outlook Repair.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparasjon SQL Server mdf og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med