Agar siz Outlook-da bir nechta elektron pochta qayd yozuvlarini sozlagan bo'lsangiz va jo'natish uchun ishlatiladigan turli xil elektron pochta hisoblari bo'yicha chiquvchi xatlarda turli shriftlardan foydalanmoqchi bo'lsangiz, ushbu maqolada keltirilgan yondashuvdan foydalanishingiz mumkin.
Ko'pgina foydalanuvchilar Outlook o'zlari jo'natish uchun foydalanadigan turli elektron pochta hisoblari asosida chiquvchi elektron pochta xabarlarida turli shriftlarni avtomatik tanlashi va ishlatishi mumkinligiga umid qiladi. Biroq, sukut bo'yicha, Outlookda bunday xususiyat mavjud emas. Yaxshiyamki, siz hali ham VBA kodi yordamida buni amalga oshirishingiz mumkin. Endi biz ushbu usulni batafsil ko'rib chiqamiz.
Elektron pochtani yuborishda turli hisoblar uchun turli shriftlardan avtomatik foydalanish
- Avvalo, Outlook ilovangizni ishga tushiring.
- Keyin, keyingi Outlook asosiy oynasida "Alt + F11" tugmachalarini bosishingiz kerak.
- Keyin siz yangi oynaga kirasiz - "Ilovalar uchun Microsoft Visual Basic".
- Ushbu oynada sizdan “ThisOutlookSession” loyihasini topishingiz va ochishingiz talab qilinadi.
- Keyinchalik, ushbu loyihaga quyidagi VBA kodini nusxa ko'chiring va joylashtiring.
'Occurs when you click "Send" button
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMail As MailItem
Dim objMailDocument As Word.Document
If TypeOf Item Is MailItem Then
Set objMail = Item
Set objMailDocument = objMail.GetInspector.WordEditor
'Use different fonts based on different send using account
'Change the accounts and fonts as per your needs
Select Case objMail.SendUsingAccount
Case "johnsmith@datanumen.com"
With objMailDocument.Range.Font
.Name = "Times New Roman"
.Size = 13
.ColorIndex = wdBlue
End With
Case "team1@datanumen.com"
With objMailDocument.Range.Font
.Name = "Cambria"
.Size = 10
.ColorIndex = wdBlack
End With
Case "johnsmith_jonny@outlook.com"
With objMailDocument.Range.Font
.Name = "Segoe Script"
.Size = 8
.ColorIndex = wdDarkYellow
End With
End Select
objMail.Save
End If
End Sub
- Shundan so'ng, ushbu kodni imzolaganingiz ma'qul.
- Birinchidan, asboblar panelidagi "Asboblar" tugmasini bosing.
- Keyin ochiladigan ro'yxatdan "Raqamli imzo" variantini tanlang.
- Keyinchalik bu vazifani bajarish uchun ekrandagi ko'rsatmalarga amal qilishingiz mumkin.
- Keyin joriy oynadan chiqishingiz va imzolangan VBA loyihalariga ruxsat berish uchun Outlook makro sozlamalarini o'zgartirishni davom ettirishingiz mumkin.
- Bundan buyon, siz har safar elektron pochta xabarini yuborganingizda, Outlook jo'natiladigan elektron pochta qayd yozuviga ko'ra, chiquvchi xatlardagi shriftlarni avtomatik ravishda o'zgartiradi.
Kutilmagan Outlook halokatiga tayyor bo'ling
Outlookning zaifligi tufayli, foydalanuvchilar Outlook bilan ishlashda doimo turli muammolarga yaxshi tayyorgarlik ko'rishlari kerak. Shubhasiz, eng muhim qadamlardan biri Outlook ma'lumotlari uchun izchil va yangilangan zaxira nusxasini yaratishdir. Bunday zaxira nusxalari bilan, asl Outlook ma'lumotlari ishdan chiqqan taqdirda ham, siz baribir ... qila olasiz. Outlook-ni tiklash zaxira nusxalaridan ma'lumotlarni juda osonlik bilan yaratish. Bundan tashqari, Outlook-ni kuchli tuzatish vositasi bilan jihozlash tavsiya etiladi, masalan DataNumen Outlook Repair. Zaxira nusxalari muvaffaqiyatsiz bo'lganda 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 sql buzilishi va Outlook ta'mirlash dasturiy mahsulotlar. Qo'shimcha ma'lumot olish uchun tashrif buyuring www.datanumen.com