Az Outlook az összes kapcsolattartói e-mailt az alapértelmezett megjelenített név formátumában jeleníti meg, nevezetesen „teljes név (e-mail cím)”. Ha nem tetszik, manuálisan kell módosítania minden alkalommal, amikor új névjegyeket hoz létre. Ebből a cikkből megtudhatja, hogyan módosíthatja gyorsan ezeket az Outlook VBA-val csoportosan.
Amikor új Outlook-névjegyet hoz létre, miután megadta a teljes nevet és e-mail címet, majd a „Megjelenítés mint” mezőbe kattintott, az alapértelmezett megjelenített név automatikusan kitöltésre kerül, a következő képernyőképen látható módon:
Ez az e-mail megjelenített név hatással lesz, amikor ki kell választania egy névjegyet. Az alábbi képhez hasonlóan a 2nd A „Megjelenítési név” oszlop megfelel a „Megjelenítés mint” mezőben található információnak.
Ha módosítani szeretné az e-mail megjelenített név formátumát, manuálisan kell módosítania. De a VBA segítségével kötegenként módosíthatja az összes névjegy e-mail megjelenített nevének formátumát a kívánt formátumra.
Módosítsa az összes névjegy e-mail megjelenítési névformátumát kötegekben
- Először is indítsa el az Outlookot, és nyomja meg az „Alt + F11” billentyűket a „Visual Basic” ablak eléréséhez.
- Ezután nyisson meg egy új modult, és másolja bele a következő VBA kódokat.
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 tippek:
- A sorrendet tetszés szerint módosíthatja a „teljes név”, a „cégnév” és az „e-mail cím” között.
- Az.Teljes név” a „Keresztnév Vezetéknév” formátumára utal. Ha meg szeretné jeleníteni a „Vezetéknév Keresztnév” mezőben, használja a „.LastNameAndFirstName”Helyett.
- Ezt követően, a VBA-kódok beillesztése után, hozzá kell adnia az új makrót a Gyorselérési eszköztárhoz. Kövesse az alábbi lépéseket:
- Először lépjen vissza az Outlook főablakába, és nyomja meg a lefelé mutató nyilat a Gyorselérési eszköztárban.
- A legördülő listából válassza a „További parancsok” lehetőséget.
- Ezután az „Outlook beállításai” ablakban válassza ki a „Makrók” lehetőséget a „Parancsok kiválasztása innen” mezőben.
- Ezt követően jelölje ki a célmakrót, és nyomja meg a középső „Hozzáadás” gombot.
- Végül kattintson az „OK” gombra.
- Végül visszatérhet az alapértelmezett névjegymappához. Kattintson a makró gombra a Gyorselérési eszköztárban. Ezután megnyithat egy névjegyet az ellenőrzéshez. Látni fogja, hogy az e-mail megjelenített név formátuma megváltozott.
Menekülés az Outlook adatvesztés elől
Mint mindannyian tudjuk, az Outlook érzékeny a hibákra és a korrupciókra. Ezért nehéz feladat az Outlook adatainak védelme és az adatvesztés megakadályozása. Tehát rendszeresen biztonsági másolatot kell készítenie az Outlook adatairól, ami nagyban hozzájárul Outlook adatkárosodás helyreállítása az Outlook összeomlása esetén. Emellett elengedhetetlen egy erős javítószerszám beszerzése, mint pl DataNumen Outlook Repair. Összességében hasznos lesz, ha a biztonsági mentés nem aktuális, vagy nem hoz hatást.
Szerző Bevezetés:
Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve javítás SQL Server mdf adatbázis sérülés és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com