Kuidas muuta Outlook VBA abil kõigi oma kontaktide e-posti kuvatavate nimede vorminguid partiidena

Outlooki lahendused September 29, 2025

Outlook kuvab kõik kontaktmeilid kuvatava nime vaikevormingus, nimelt "täisnimi (e-posti aadress)". Kui see teile ei meeldi, peate seda uute kontaktide loomisel iga kord käsitsi muutma. See artikkel õpetab teile kiiret viisi, kuidas neid Outlook VBA-ga partiidena muuta.

Kui loote uue Outlooki kontakti, sisestatakse täisnimi ja e-posti aadress ning seejärel klõpsate kasti "Kuva kui", täidetakse automaatselt kuvatav vaikenimi, mis on näidatud järgmise ekraanipildina:

E-posti kuvatava nime vaikevorming

See meili kuvatav nimi mõjutab kontakti valimisel. Nagu alloleval pildil, on 2nd veerg „Kuvatav nimi” vastab teabele väljal „Kuva kui”.

Kuvatava nime veerg

Kui soovite muuta meili kuvatava nime vormingut, peate seda käsitsi muutma. Kuid VBA abil saate muuta kõigi kontaktide e-posti kuvatava nime vormingu soovitud vormingusse partiidena.

Muutke kõigi oma kontaktide e-posti kuvatavate nimede vorminguid partiidena

  1. Kõigepealt käivitage Outlook ja vajutage "Visual Basicu" akna avamiseks klahve "Alt + F11".
  2. Seejärel avage uus moodul ja kopeerige sinna järgmised VBA koodid.
Sub BatchChangeContactDisplayName()
    Dim obApp As Application
    Dim olContacts As Outlook.Items
    Dim obj As Object
    Dim oContact As Outlook.ContactItem
    Dim strName As String
 
    Set olContacts = Session.GetDefaultFolder(olFolderContacts).Items
 
    For Each obj In olContacts
        If TypeName(obj) = "ContactItem" Then
           Set oContact = obj
           With oContact
                'Display name format: "fullname (company name)(email address)"
                 strName = .FullName & " (" & .CompanyName & ")" & " (" & .Email1Address & ") "
                .Email1DisplayName = strName
                .Save
           End With
        End If
    Next
End Sub

Kopeerige VBA koodid uude moodulisse

Lisanõuanded:

  • Tellimust saate vastavalt oma eelistustele muuta "täisnime", "ettevõtte nime" ja "e-posti aadressi" vahel.
  • ".Täisnimi” viitab vormingule jaotises „Eesnimi Perekonnanimi”. Kui soovite kuvada jaotises "Perekonnanimi Eesnimi", kasutage.PerenimiJaEesnimi”Asemel.
  1. Seejärel peaksite pärast VBA-koodide kleepimist lisama uue makro kiirpääsu tööriistaribale. Järgige alltoodud samme.
  • Esiteks minge tagasi Outlooki peaaknasse ja vajutage kiirpääsu tööriistaribal allanoolt.
  • Valige rippmenüüst "Veel käske".Veel käske
  • Seejärel peaksite aknas "Outlooki suvandid" kastis "Vali käsud" valima "Makrod".
  • Seejärel määrake sihtmakro ja vajutage keskel nuppu „Lisa“.
  • Lõpuks klõpsake nuppu "OK".Lisage kiirjuurdepääsu tööriistaribale uus makro
  1. Lõpuks saate naasta oma vaikekontaktide kausta. Klõpsake kiirjuurdepääsu tööriistaribal makronuppu. Pärast seda saate kontrollimiseks ühe kontakti avada. Näete, et meili kuvatava nime vormingut on muudetud.Muutke kõigi oma kontaktide e-posti kuvatavate nimede vorminguid

Põgenemine Outlooki andmekao eest

Nagu me kõik teame, on Outlook vastuvõtlik vigadele ja korruptsioonidele. Seetõttu on Outlooki andmete kaitsmine ja andmete kadumise vältimine vaevarikas ülesanne. Seega peaksite oma Outlooki andmetest regulaarselt varundama, mis aitab palju kaasa Outlooki andmete kahjustuste taastamine Outlooki krahhi korral. Samuti on oluline hankida võimas remonditööriist, näiteks DataNumen Outlook Repair. Kokkuvõttes on see kasulik, kui varukoopia pole ajakohane või ei anna tulemusi.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas remont SQL Server mdf andmebaasi kahjustus ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.