Outlook barcha kontakt elektron pochta xabarlarini standart ko'rsatilgan nom formatida ko'rsatadi, ya'ni "to'liq ism (elektron pochta manzili)". Agar sizga yoqmasa, har safar yangi kontaktlar yaratishda uni qo'lda o'zgartirishingiz kerak bo'ladi. Ushbu maqola sizga Outlook VBA yordamida ularni to'plamlarda o'zgartirishning tezkor usulini o'rgatadi.
Yangi Outlook kontaktini yaratganingizda, to'liq ism va elektron pochta manzilini kiritganingizdan so'ng, "Boshqa ko'rsatish" oynasini bosganingizdan so'ng, standart displey nomi avtomatik ravishda to'ldiriladi va quyidagi skrinshot sifatida ko'rsatiladi:
Ushbu e-pochta nomi kontaktni tanlashingiz kerak bo'lganda effekt beradi. Quyidagi rasm kabi, 2nd "Display Name" ustuni "Display as" maydonidagi ma'lumotlarga mos keladi.
Elektron pochta ko'rsatish nomi formatini o'zgartirmoqchi bo'lsangiz, uni qo'lda o'zgartirishingiz kerak. Ammo VBA yordamida siz barcha kontaktlarning elektron pochta ko'rsatish nomi formatini o'zingiz xohlagan formatga to'plamlarda o'zgartirishingiz mumkin.
To'plamdagi barcha kontaktlaringizning elektron pochta ko'rsatish nomi formatlarini o'zgartiring
- Birinchidan, Outlook-ni ishga tushiring va "Visual Basic" oynasiga kirish uchun "Alt + F11" tugmachalarini bosing.
- Keyin yangi modulni oching va unga quyidagi VBA kodlarini nusxalang.
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
Qo'shimcha maslahatlar:
- Buyurtmani o'zingizning xohishingizga ko'ra "to'liq ism", "kompaniya nomi" va "elektron pochta manzili" orasida o'zgartirishingiz mumkin.
- ".To'liq ism” “Ism familiyasi”dagi formatga ishora qiladi. Agar siz “Familiya familiyasi”da ko‘rsatmoqchi bo‘lsangiz, “ dan foydalaning..LastNameVaFirstName”O'rniga.
- Keyinchalik, VBA kodlarini joylashtirgandan so'ng, tez kirish asboblar paneliga yangi makrosni qo'shishingiz kerak. Quyidagi amallarni bajaring:
- Birinchidan, asosiy Outlook oynasiga qayting va Tez kirish asboblar panelidagi pastga o'qni bosing.
- Ochiladigan ro'yxatda "Qo'shimcha buyruqlar" ni tanlang.
- Keyin "Outlook Options" oynasida "Buyruqlarni tanlang" oynasida "Makrolar" ni tanlashingiz kerak.
- Keyin, maqsadli makro ustiga qo'ying va o'rtadagi "Qo'shish" tugmasini bosing.
- Nihoyat, "OK" tugmasini bosing.
- Oxir-oqibat siz standart kontaktlar papkasiga qaytishingiz mumkin. Tez kirish asboblar panelidagi makros tugmasini bosing. Shundan so'ng, tekshirish uchun bitta kontaktni ochishingiz mumkin. Elektron pochta ko'rsatish nomi formati o'zgartirilganligini topasiz.
Outlook ma'lumotlarini yo'qotishdan qochish
Hammamizga ma'lumki, Outlook xatolarga, buzilishlarga moyil. Shuning uchun, Outlook ma'lumotlarini himoya qilish va ma'lumotlar yo'qotilishining oldini olish juda qiyin vazifadir. Shunday qilib, siz Outlook ma'lumotlaringiz uchun muntazam zaxira nusxasini yaratishingiz kerak, bu esa katta hissa qo'shadi Outlook ma'lumotlariga zararni tiklash Outlook ishdan chiqqan taqdirda. Bundan tashqari, kuchli ta'mirlash vositasini olish juda muhim, masalan DataNumen Outlook Repair. Umuman olganda, agar zaxira joriy bo'lmasa yoki effekt bermasa, bu foydali bo'ladi.
Muallif kirish:
Shirli Chjan ma'lumotlarni qayta tiklash bo'yicha mutaxassis DataNumenMa'lumotlarni qayta tiklash texnologiyalari bo'yicha jahon yetakchisi bo'lgan , Inc ta'mirlash SQL Server mdf ma'lumotlar bazasiga zarar va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com