Sådan ændres e-mail-displaynavnformaterne for alle dine kontakter i batches med Outlook VBA

Outlook viser alle kontakt-e-mails i dets standardvisningsnavnformat, nemlig “fuldt navn (e-mail-adresse)”. Hvis du ikke kan lide det, skal du ændre det manuelt hver gang du opretter nye kontakter. Denne artikel vil lære dig en hurtig måde at ændre dem på i batcher med Outlook VBA.

Når du opretter en ny Outlook-kontakt, efter at du har indtastet det fulde navn og e-mail-adresse og derefter klikker i feltet "Vis som", udfyldes standardvisningsnavnet automatisk, vist som følgende skærmbillede:

Dette e-mail-displaynavn får effekter, når du skal vælge en kontakt. Ligesom billedet nedenfor, 2^nd kolonne "Visningsnavn" svarer til info i feltet "Vis som".

Når du vil ændre formatet for e-mail-displaynavn, skal du ændre det manuelt. Men ved hjælp af VBA kan du ændre alle kontaktpersonernes e-mail-visningsnavnformat til dit ønskede format i batches.

Skift e-mail-visningsnavnformaterne for alle dine kontakter i batches

1. For det første skal du starte Outlook og trykke på "Alt + F11" -tasten for at få adgang til "Visual Basic" -vinduet.
2. Åbn derefter et nyt modul, og kopier følgende VBA-koder til det.

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

Ekstra tip:

• Du kan ændre rækkefølgen mellem "fuldt navn", "firmanavn" og "e-mail-adresse" efter dine præferencer.
• Den ".Fulde navn”Henviser til formatet i“ Fornavn Efternavn ”. Hvis du vil vise i "Efternavn Fornavn", skal du bruge ".LastNameAndFirstName”I stedet.

3. Efter at have indsat VBA-koderne, skal du tilføje den nye makro til værktøjslinjen Hurtig adgang. Følg nedenstående trin:

• For det første skal du gå tilbage til hovedvinduet i Outlook og trykke på pil ned i værktøjslinjen Hurtig adgang.
• Vælg "Flere kommandoer" på rullelisten.
• Derefter skal du i vinduet "Outlook-indstillinger" vælge "Makroer" i feltet "Vælg kommandoer fra".
• Derefter skal du vælge den ønskede makro, og trykke på knappen "Tilføj" i midten.
• Til sidst skal du klikke på “OK” -knappen.

4. Til sidst kan du vende tilbage til din standard kontaktmappe. Klik på makroknappen i værktøjslinjen Hurtig adgang. Derefter kan du åbne en kontaktperson for at kontrollere. Du finder ud af, at e-mail-visningsnavnet er ændret.

Undslippe fra datatab i Outlook

Som vi alle ved, er Outlook modtageligt for fejl, korruption. Derfor er det en vanskelig opgave at holde Outlook-data beskyttet og forhindre tab af data. Så du burde lave en regelmæssig sikkerhedskopi af dine Outlook-data, hvilket vil bidrage meget til Gendannelse af Outlook dataskader i tilfælde af Outlook-nedbrud. Det er også vigtigt at få et kraftigt reparationsværktøj, såsom DataNumen Outlook Repair. Alt i alt vil det være nyttigt, hvis sikkerhedskopien ikke er aktuel eller ikke giver effekter.

Forfatter Introduktion:

Shirley Zhang er ekspert i datagendannelse i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparere SQL Server mdf-databaseskade og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com