Hur man använder olika teckensnitt automatiskt för olika konton när man skickar e-post i Outlook

Om du har konfigurerat flera e-postkonton i din Outlook och vill använda olika teckensnitt i utgående e-postmeddelanden enligt olika e-postkonton som används för att skicka, kan du använda den metod som introduceras i den här artikeln.

Många användare hoppas att Outlook automatiskt kan välja och använda olika teckensnitt i utgående e-post baserat på olika e-postkonton som de använder för att skicka. Som standard har dock Outlook inte en sådan funktion. Lyckligtvis kan du fortfarande inse detta med hjälp av VBA-kod. Nu kommer vi att avslöja denna metod i detalj.

Använd automatiskt olika teckensnitt för olika konton när du skickar e-post

1. Starta först ditt Outlook-program.
2. Sedan, i det efterföljande Outlook-huvudfönstret, borde du trycka på “Alt + F11” -tangenterna.
3. Därefter kommer du in i ett nytt fönster - "Microsoft Visual Basic for Applications".
4. I det här fönstret måste du hitta och öppna projektet "ThisOutlookSession".
5. Kopiera sedan och klistra in följande VBA-kod i detta projekt.

'Occurs when you click "Send" button
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As MailItem
    Dim objMailDocument As Word.Document
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
       Set objMailDocument = objMail.GetInspector.WordEditor
 
       'Use different fonts based on different send using account
       'Change the accounts and fonts as per your needs
       Select Case objMail.SendUsingAccount
              Case "johnsmith@datanumen.com"
                   With objMailDocument.Range.Font
                        .Name = "Times New Roman"
                        .Size = 13
                        .ColorIndex = wdBlue
                   End With
              Case "team1@datanumen.com"
                   With objMailDocument.Range.Font
                        .Name = "Cambria"
                        .Size = 10
                        .ColorIndex = wdBlack
                   End With
              Case "johnsmith_jonny@outlook.com"
                   With objMailDocument.Range.Font
                        .Name = "Segoe Script"
                        .Size = 8
                        .ColorIndex = wdDarkYellow
                   End With
      End Select
 
      objMail.Save
    End If
End Sub

6. Efter det är det bättre att du signerar den här koden.

• Klicka först på knappen "Verktyg" i verktygsfältet.
• Välj sedan alternativet "Digital signatur" i listrutan.
• Senare kan du följa instruktionerna på skärmen för att slutföra uppgiften.

7. Sedan kan du stänga det aktuella fönstret och fortsätta ändra dina Outlook-makroinställningar för att tillåta de signerade VBA-projekten.
8. Från och med nu, varje gång när du skickar ett e-postmeddelande, ändrar Outlook teckensnitt i de utgående e-postmeddelandena automatiskt enligt det e-postkonto som ska skickas.

Håll dig förberedd för oväntat Outlook-krasch

På grund av Outlooks sårbarhet måste användare vara väl förberedda på olika problem när de hanterar Outlook hela tiden. Utan tvekan är ett av de viktigaste stegen att göra en konsekvent och aktuell säkerhetskopia av Outlook-data. Med sådana säkerhetskopior kan du fortfarande, även om den ursprungliga Outlook-datan skadas vid en krasch, återställa Outlook data från säkerhetskopior med största möjliga lätthet. Dessutom är det också lämpligt att utrusta din Outlook med ett kraftfullt reparationsverktyg, till exempel DataNumen Outlook Repair. Det kommer att vara till nytta när säkerhetskopior misslyckas.

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 sql korruption och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com