Ako zmeniť formáty zobrazovaného e-mailu všetkých vašich kontaktov v dávkach pomocou programu Outlook VBA

Program Outlook zobrazí všetky kontaktné e-maily v predvolenom formáte zobrazovaného mena, konkrétne „celé meno (e-mailová adresa)“. Ak sa vám nepáči, budete to musieť pri vytváraní nových kontaktov meniť ručne. Tento článok vás naučí rýchly spôsob, ako ich meniť v dávkach pomocou aplikácie Outlook VBA.

Pri vytváraní nového kontaktu programu Outlook sa po zadaní celého mena a e-mailovej adresy a kliknutí do poľa „Zobraziť ako“ automaticky vyplní predvolený zobrazovaný názov, ktorý sa zobrazí ako nasledujúca snímka obrazovky:

Toto zobrazované meno e-mailu sa prejaví, keď budete musieť vybrať kontakt. Rovnako ako na obrázku nižšie, 2^nd stĺpec „Zobrazovaný názov“ zodpovedá informáciám v poli „Zobraziť ako“.

Ak chcete zmeniť formát zobrazovaného mena e-mailu, musíte ho zmeniť manuálne. Ale pomocou VBA môžete hromadne zmeniť všetky zobrazované e-mailové adresy kontaktov na požadovaný formát.

Zmeňte formáty zobrazovaného mena e-mailu všetkých vašich kontaktov v dávkach

1. Na prvom mieste spustite program Outlook a stlačením klávesov „Alt + F11“ otvorte okno „Visual Basic“.
2. Potom otvorte nový modul a skopírujte do neho nasledujúce kódy VBA.

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

Extra tipy:

• Objednávku môžete podľa želania zmeniť medzi „celým menom“, „názvom spoločnosti“ a „e-mailovou adresou“.
• ".Celé meno”Odkazuje na formát v položke„ Meno a Priezvisko “. Ak sa chcete zobraziť v časti „Priezvisko Priezvisko“, použite „.Posledné meno a prvé meno”Namiesto toho.

3. Následne po vložení kódov VBA by ste mali pridať nové makro na panel s nástrojmi Rýchly prístup. Postupujte podľa nasledujúcich pokynov:

• Najskôr sa vráťte do hlavného okna Outlooku a na paneli s nástrojmi Rýchly prístup stlačte šípku nadol.
• V rozbaľovacom zozname zvoľte možnosť „Viac príkazov“.
• V okne „Možnosti programu Outlook“ by ste potom mali v poli „Vybrať príkazy z“ zvoliť „Makrá“.
• Následne umiestnite kurzor na cieľové makro a stlačte tlačidlo „Pridať“ v strede.
• Nakoniec kliknite na tlačidlo „OK“.

4. Nakoniec sa môžete vrátiť do predvoleného priečinka kontaktov. Kliknite na tlačidlo makra na paneli s nástrojmi Rýchly prístup. Potom môžete otvoriť jeden kontakt na kontrolu. Zistíte, že bol zmenený formát zobrazovaného mena e-mailu.

Únik z straty dát v Outlooku

Ako všetci vieme, Outlook je náchylný na chyby a poškodenia. Preto je náročnou úlohou chrániť údaje programu Outlook a zabrániť ich strate. Mali by ste si teda pravidelne zálohovať svoje údaje z Outlooku, čo k tomu veľa prispeje Obnova poškodenia údajov v programe Outlook v prípade zlyhania Outlooku. Je tiež nevyhnutné zaobstarať si silný nástroj na opravu, ako je napr DataNumen Outlook Repair. Celkovo sa vám bude hodiť, ak zálohovanie nie je aktuálne alebo nemá efekt.

Úvod autora:

Shirley Zhang je expertkou na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane oprava SQL Server poškodenie databázy mdf a výhľadové softvérové ​​produkty na opravu. Pre viac informácií navštívte www.datanumen. S