Kuidas Outlookis meili saatmisel erinevate kontode jaoks automaatselt kasutada erinevaid fonte

Outlooki lahendused September 29, 2025

Kui olete oma Outlookis konfigureerinud mitu meilikontot ja soovite kasutada väljaminevates e-kirjades erinevaid fonte vastavalt erinevatele saatmiseks kasutatavatele meilikontodele, saate kasutada selles artiklis kirjeldatud lähenemisviisi.

Paljud kasutajad loodavad, et Outlook saab väljaminevates meilides automaatselt valida ja kasutada erinevaid fonte, mis põhinevad erinevatel meilikontodel, mida nad saatmiseks kasutavad. Vaikimisi aga Outlookil sellist funktsiooni pole. Õnneks saate sellest ikkagi aru VBA-koodi abil. Nüüd tutvustame seda meetodit üksikasjalikult.

Kasutage Outlookis meili saatmisel erinevate kontode jaoks erinevaid fonte

Kasutage meili saatmisel automaatselt erinevate kontode jaoks erinevaid fonte

  1. Esiteks käivitage oma Outlooki rakendus.
  2. Seejärel peaksite järgmises Outlooki põhiaknas vajutama klahve Alt + F11.
  3. Järgmisena sisenete uude aknasse - "Microsoft Visual Basic for Applications".
  4. Selles aknas peate leidma ja avama projekti „ThisOutlookSession”.
  5. Seejärel kopeerige ja kleepige sellesse projekti järgmine VBA kood.
'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

VBA kood – kasutage erinevate kontode jaoks erinevaid fonte

  1. Pärast seda on parem sellele koodile alla kirjutada.
  • Kõigepealt klõpsake tööriistaribal nuppu "Tööriistad".
  • Seejärel valige ripploendist "Digiallkiri".
  • Hiljem saate selle ülesande täitmiseks järgida ekraanil kuvatavaid juhiseid.
  1. Seejärel saate praegusest aknast väljuda ja jätkata Outlooki makro sätete muutmist, et lubada allkirjastatud VBA-projekte.
  2. Edaspidi muudab Outlook iga kord, kui saadate e-kirja, väljaminevate e-kirjade fonte vastavalt saatmise meilikontole.

Olge valmis ootamatuks Outlooki krahhiks

Outlooki haavatavuse tõttu peavad kasutajad olema Outlookiga pidevalt tegeledes mitmesuguste probleemide jaoks hästi valmis. Kahtlemata on üks olulisemaid samme Outlooki andmete järjepideva ja ajakohase varukoopia tegemine. Selliste varukoopiate abil saate isegi siis, kui Outlooki algsed andmed krahhi ajal kahjustuvad, ikkagi... Outlooki taastamine andmeid varukoopiatest ülima kergusega. Lisaks on soovitatav varustada oma Outlook võimsa parandustööriistaga, näiteks DataNumen Outlook Repair. See on kasulik, kui varundamine ebaõnnestub.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas sql korruptsioon ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.