Så här ändrar du e-postvisningsnamnsformaten för alla dina kontakter i partier med Outlook VBA

Outlook visar alla kontakt-e-postmeddelanden i standardformat för visningsnamn, nämligen ”fullständigt namn (e-postadress)”. Om du ogillar det måste du ändra det manuellt varje gång du skapar nya kontakter. Den här artikeln lär dig ett snabbt sätt att ändra dem i satser med Outlook VBA.

När du skapar en ny Outlook-kontakt, efter att du matat in fullständigt namn och e-postadress och sedan klickat i rutan "Visa som", fylls standardvisningsnamnet automatiskt in, visas som följande skärmdump:

Standardformat för e-postvisningsnamn

Det här e-postvisningsnamnet kommer att få effekter när du behöver välja en kontakt. Som bilden nedan, 2nd kolumn ”Visningsnamn” motsvarar informationen i fältet “Visa som”.

Visa namnkolumn

När du vill ändra formatet på e-postens visningsnamn måste du ändra det manuellt. Men med hjälp av VBA kan du ändra alla kontakternas e-postvisningsnamnformat till önskat format i satser.

Ändra e-postvisningsformaten för alla dina kontakter i partier

  1. För det första startar du Outlook och trycker på “Alt + F11” -tangenterna för att komma till “Visual Basic” -fönstret.
  2. Öppna sedan en ny modul och kopiera följande VBA-koder till 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

Kopiera VBA-koder till en ny modul

Extra tips:

  • Du kan ändra ordningen mellan "fullständigt namn", "företagsnamn" och "e-postadress" enligt dina önskemål.
  • Den ".Fullständiga namn”Hänvisar till formatet i“ Förnamn Efternamn ”. Om du vill visa i "Efternamn Förnamn", använd ".Efternamn och förnamn" istället.
  1. Därefter, efter att du har klistrat in VBA-koder, bör du lägga till det nya makrot i snabbåtkomstverktygsfältet. Följ stegen nedan:
  • För det första, gå tillbaka till huvudfönstret i Outlook och tryck på nedåtpilen i verktygsfältet Snabbåtkomst.
  • Välj "Fler kommandon" i listrutan.Fler kommandon
  • I fönstret "Outlook-alternativ" ska du välja "Makron" i rutan "Välj kommandon från".
  • Placera sedan målmakrot och tryck på knappen "Lägg till" i mitten.
  • Slutligen klicka på “OK” -knappen.Lägg till den nya makroen i snabbåtkomstverktygsfältet
  1. Så småningom kan du återgå till din standardmapp för kontaktpersoner. Klicka på makroknappen i snabbåtkomstverktygsfältet. Därefter kan du öppna en kontakt för att kontrollera. Du kommer att upptäcka att e-postens visningsnamn har ändrats.Ändra visningsnamnsformaten för e-post för alla dina kontakter

Fly från dataförlust i Outlook

Som vi alla vet är Outlook mottagligt för fel, korruption. Därför är det en svår uppgift att hålla Outlook-data skyddade och förhindra dataförlust. Så du borde göra en regelbunden säkerhetskopia av dina Outlook-data, vilket kommer att bidra mycket till Återhämtning av dataskador i Outlook vid Outlook-krasch. Det är också viktigt att få ett kraftfullt reparationsverktyg, t.ex. DataNumen Outlook Repair. Sammantaget kommer det att vara till nytta om säkerhetskopian inte är aktuell eller inte gör effekter.

Författarintroduktion:

Shirley Zhang är expert på dataåterställning DataNumen, Inc., som är världsledande inom teknik för återställning av data, inklusive reparation SQL Server mdf-databasskada och Outlook-programvara för reparationsprogramvara. För mer information besök www.datanumen.com

Kommentarer är stängda.