Hvordan endre e-postvisningsnavneformatene for alle kontaktene dine i grupper med Outlook VBA

Outlook vil vise alle kontakt-e-postene i standard visningsnavnformat, nemlig "fullt navn (e-postadresse)". Hvis du ikke liker det, må du endre det manuelt hver gang når du oppretter nye kontakter. Denne artikkelen vil lære deg en rask måte å endre dem i grupper med Outlook VBA.

Når du oppretter en ny Outlook-kontakt, etter at du har skrevet inn hele navnet og e-postadressen og deretter klikket inn i "Vis som"-boksen, vil standard visningsnavn fylles ut automatisk, vist som følgende skjermbilde:

Standard visningsnavn for e-post

Dette e-postvisningsnavnet vil ha effekter når du trenger å velge en kontakt. Som bildet nedenfor, 2nd kolonnen "Visningsnavn" tilsvarer informasjonen i "Vis som"-feltet.

Visningsnavnkolonne

Når du ønsker å endre formatet for e-postvisningsnavn, må du endre det manuelt. Men ved hjelp av VBA kan du endre alle kontaktenes visningsnavn for e-post til ønsket format i grupper.

Endre formatene for visningsnavn for e-post for alle kontaktene dine i grupper

  1. For det første, start Outlook og trykk på "Alt + F11"-tastene for å få tilgang til "Visual Basic"-vinduet.
  2. Åpne deretter en ny modul og kopier følgende VBA-koder inn i den.
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

Kopier VBA-kodene til en ny modul

Ekstra tips:

  • Du kan endre rekkefølgen mellom "fullt navn", "selskapsnavn" og "e-postadresse" i henhold til dine preferanser.
  • Den ".Fullt navn" refererer til formatet i "Fornavn Etternavn". Hvis du vil vise i «Etternavn Fornavn», bruk «.LastNameAndFirstNameI stedet.
  1. Deretter, etter å ha limt inn VBA-kodene, bør du legge til den nye makroen til Quick Access Toolbar. Følg trinnene nedenfor:
  • Først går du tilbake til hovedvinduet i Outlook og trykker på nedoverpilen i hurtigtilgangsverktøylinjen.
  • Fra rullegardinlisten velger du "Flere kommandoer".Flere kommandoer
  • Så i "Outlook-alternativer"-vinduet, bør du velge "Makroer" i "Velg kommandoer fra"-boksen.
  • Deretter velger du målmakroen og trykker på «Legg til»-knappen i midten.
  • Klikk til slutt på "OK"-knappen.Legg til den nye makroen til verktøylinjen for hurtigtilgang
  1. Etter hvert kan du gå tilbake til standard kontaktmappe. Klikk på makroknappen i hurtigtilgangsverktøylinjen. Etter det kan du åpne en kontakt for å sjekke. Du vil oppdage at formatet for visningsnavn for e-post er endret.Endre formatene for visningsnavn for e-post for alle kontaktene dine

Unngå tap av Outlook-data

Som vi alle vet, er Outlook utsatt for feil, korrupsjon. Derfor er det en vanskelig oppgave å holde Outlook-data beskyttet og forhindre tap av data. Så du bør ta en jevnlig sikkerhetskopi av Outlook-dataene dine, noe som vil bidra mye til Gjenoppretting av Outlook-dataskader i tilfelle Outlook-krasj. Det er også viktig å få et kraftig reparasjonsverktøy, som f.eks DataNumen Outlook Repair. Alt i alt vil det komme godt med hvis sikkerhetskopien ikke er oppdatert eller ikke gir effekter.

Forfatterintroduksjon:

Shirley Zhang er en datagjenopprettingsekspert innen DataNumen, Inc., som er verdensledende innen datagjenopprettingsteknologier, inkludert reparasjon SQL Server mdf-databaseskade og Outlook-reparasjonsprodukter. For mer informasjon besøk www.datanumen. Med

Kommentarer er stengt.