Kuinka muuttaa kaikkien yhteyshenkilöiden sähköpostin näyttönimen muotoja erissä Outlook VBA: n avulla

Outlook näyttää kaikki yhteyssähköpostit oletusnäyttömuodossaan, nimittäin "koko nimi (sähköpostiosoite)". Jos et pidä siitä, sinun on vaihdettava se manuaalisesti joka kerta, kun luot uusia yhteystietoja. Tämä artikkeli opettaa sinulle nopean tavan muuttaa niitä erissä Outlook VBA: n avulla.

Kun luot uuden Outlook-yhteystiedon, kun olet syöttänyt koko nimen ja sähköpostiosoitteen ja napsauttanut sitten Näytä nimellä -ruutua, oletusnäyttönimi täytetään automaattisesti, joka näkyy seuraavana kuvakaappauksena:

Oletussähköpostin näyttönimen muoto

Tämä sähköpostiosoite saa aikaan vaikutuksia, kun sinun on valittava yhteyshenkilö. Kuten alla olevassa kuvassa, 2nd sarake "Näyttönimi" vastaa "Näytä nimellä" -kentän tietoja.

Näyttönimi -sarake

Kun haluat muuttaa sähköpostin näyttönimen muotoa, sinun on vaihdettava se manuaalisesti. Mutta VBA: n avulla voit muuttaa kaikkien yhteyshenkilöiden sähköpostin näyttönimen muodon haluamaasi muotoon erissä.

Muuta kaikkien yhteystietojesi sähköpostin näyttönimimuotoja erissä

  1. Käynnistä ensin Outlook ja paina "Alt + F11" -näppäimiä päästäksesi Visual Basic -ikkunaan.
  2. Avaa sitten uusi moduuli ja kopioi siihen seuraavat VBA-koodit.
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

Kopioi VBA-koodit uuteen moduuliin

Lisävinkkejä:

  • Voit muuttaa tilausta "koko nimi", "yrityksen nimi" ja "sähköpostiosoite" mieltymystesi mukaan.
  • ".Koko nimi”Viittaa muotoon” Etunimi Sukunimi ”. Jos haluat näyttää "Sukunimen etunimi" -kohdassa, käytä.LastNameAndFirstName" sen sijaan.
  1. Sen jälkeen, kun olet liittänyt VBA-koodit, sinun on lisättävä uusi makro Quick Access -työkalupalkkiin. Noudata seuraavia ohjeita:
  • Ensinnäkin palaa takaisin Outlookin pääikkunaan ja paina alaspäin osoittavaa nuolta pikakäynnistystyökalurivillä.
  • Valitse avattavasta luettelosta "Lisää komentoja".Lisää komentoja
  • Valitse sitten Outlookin asetukset -ikkunassa Valitse komennot -ruudusta "Makrot".
  • Seuraavaksi aseta kohdemakro ja paina keskellä olevaa ”Lisää”-painiketta.
  • Napsauta lopuksi “OK” -painiketta.Lisää uusi makro pikakäyttötyökaluriville
  1. Lopulta voit palata oletusyhteystietokansioon. Napsauta makropainiketta Quick Access Toolbarissa. Sen jälkeen voit avata yhden yhteystiedon tarkistettavaksi. Tulet huomaamaan, että sähköpostin näyttönimen muoto on muuttunut.Muuta kaikkien yhteystietojesi sähköpostin näyttönimen muotoja

Pakene Outlookin tietojen menetyksestä

Kuten me kaikki tiedämme, Outlook on altis virheille, vioittumisille. Siksi on vaikea tehtävä pitää Outlook-tiedot suojattuina ja estää tietojen menetys. Joten sinun pitäisi tehdä säännöllinen varmuuskopio Outlook-tiedoistasi, mikä auttaa paljon Outlookin tietojen vahingoittuminen Outlookin kaatumisen yhteydessä. Lisäksi on välttämätöntä hankkia tehokas korjaustyökalu, kuten DataNumen Outlook Repair. Kaiken kaikkiaan se on kätevä, jos varmuuskopio ei ole ajan tasalla tai se ei tee vaikutuksia.

Tekijän esittely:

Shirley Zhang on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien korjaus SQL Server mdf-tietokantavauriot ja Outlookin korjausohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com

Kommenttien lisääminen on estetty.