Kako promijeniti formate imena za prikaz e-pošte za sve svoje kontakte u skupinama s programom Outlook VBA

Outlook će prikazati sve adrese e-pošte za kontakt u zadanom formatu imena za prikaz, naime "puno ime (adresa e-pošte)". Ako vam se ne sviđa, morat ćete ga ručno promijeniti svaki put kada stvarate nove kontakte. Ovaj će vas članak naučiti kako ih brzo mijenjati u serijama s programom Outlook VBA.

Kada stvorite novi Outlook kontakt, nakon što unesete puno ime i adresu e-pošte, a zatim kliknete u okvir "Prikaži kao", automatski će se ispuniti zadano ime za prikaz, prikazano na sljedećoj snimci zaslona:

Ovo ime za prikaz e-pošte djelovat će kada trebate odabrati kontakt. Kao na slici ispod, 2^nd stupac “Ime za prikaz” odgovara informacijama u polju “Prikaži kao”.

Kada želite promijeniti format imena za prikaz e-pošte, morate ga promijeniti ručno. Ali uz pomoć VBA, možete promijeniti format prikaza imena svih kontakata u željeni format u serijama.

Promijenite formate imena za prikaz svih vaših kontakata u skupinama

1. Prvo pokrenite Outlook i pritisnite tipke "Alt + F11" za pristup prozoru "Visual Basic".
2. Zatim otvorite novi modul i u njega kopirajte sljedeće VBA kodove.

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

Dodatni savjeti:

• Možete promijeniti redoslijed između "puno ime", "naziv tvrtke" i "adresa e-pošte" prema vašim željama.
• ".Puno ime” odnosi se na format u “Ime Prezime”. Ako želite prikazati u "Prezime Ime", koristite ".PrezimeIIme"Umjesto toga.

3. Nakon toga, nakon lijepljenja VBA kodova, trebali biste dodati novu makronaredbu na alatnu traku za brzi pristup. Slijedite korake u nastavku:

• Prvo se vratite na glavni prozor programa Outlook i pritisnite strelicu prema dolje na alatnoj traci za brzi pristup.
• S padajućeg popisa odaberite "Više naredbi".
• Zatim u prozoru "Opcije programa Outlook" trebali biste odabrati "Makronaredbe" u okviru "Odaberite naredbe iz".
• Nakon toga, postavite pokazivač na ciljni makro i pritisnite gumb "Dodaj" u sredini.
• Na kraju kliknite gumb "OK".

4. Na kraju se možete vratiti u svoju zadanu mapu kontakata. Kliknite gumb makronaredbe na alatnoj traci za brzi pristup. Nakon toga možete otvoriti jedan kontakt za provjeru. Vidjet ćete da je format imena za prikaz e-pošte promijenjen.

Pobjeći od gubitka podataka u Outlooku

Kao što svi znamo, Outlook je osjetljiv na pogreške, oštećenja. Stoga je zaštita podataka Outlooka i sprječavanje gubitka podataka težak zadatak. Stoga biste trebali napraviti redovitu sigurnosnu kopiju svojih Outlook podataka, što će puno doprinijeti Oporavak oštećenih podataka Outlooka u slučaju pada programa Outlook. Također, bitno je nabaviti moćan alat za popravak, kao što je DataNumen Outlook Repair. Sve u svemu, dobro će doći ako backup nije aktualan ili ne daje efekte.

Uvod za autora:

Shirley Zhang stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popravak SQL Server mdf oštećenje baze podataka i softverske proizvode za popravak Outlooka. Za više informacija posjetite www.datanumen.com