VBA-ээр дамжуулан холбоо барих, томилох, даалгавар өгөх үндсэн фонтыг хэрхэн тохируулах вэ

Outlook-д харилцагчийн үндсэн хэсэг, уулзалт, даалгаврын үндсэн фонтыг тохируулах үндсэн функц байхгүй. Тиймээс, хэрэв та фонтыг зааж өгөхийг хүсвэл энэ нийтлэлд танилцуулсан аргыг ашиглаж болно.

Имэйлийн нэгэн адил Outlook уулзалт, даалгавар, холбоо барих хэсэг нь мөн зүйлийн дэлгэрэнгүй мэдээллийг бөглөх үндсэн талбартай байдаг. Гэсэн хэдий ч Outlook нь зөвхөн хэрэглэгчдэд имэйлийн үндсэн хэсэгт ашигладаг өгөгдмөл фонтыг тохируулахыг зөвшөөрдөг. Хэрэв та холбоо барих хаяг, уулзалт, даалгаварт фонтыг зааж өгөхийг хүсвэл гуравдагч талын нэмэлт програмууд эсвэл Outlook VBA гэх мэт өөр хэрэгслийг хайх хэрэгтэй. Энд бид VBA-г хэрхэн ашиглах талаар дэлгэрэнгүй заах болно. Дэлгэрэнгүй алхамууд болон холбогдох VBA кодуудыг сурахын тулд уншина уу.

Томилгоо, даалгавар, холбоо барих хаягийн үндсэн фонтыг тохируулна уу

1. Хамгийн эхэнд start таны Outlook програм.
2. Дараа нь "Alt + F11" товчийг дарж Outlook VBA засварлагчийг ажиллуулна уу.
3. Гарч ирэх цонхонд та "ThisOutlookSession" төслийг нээх хэрэгтэй.
4. Дараа нь дараахь VBA кодыг энэхүү төслийн цонхонд хуулж ав.

Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objInspector As Outlook.Inspector

Public Sub Application_Startup()
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Public Sub objInspectors_NewInspector(ByVal Inspector As Outlook.Inspector)
    Set objInspector = Inspector
End Sub

Public Sub objInspector_Activate()
    Dim objCurrentItem As Object
    Dim objCurrentInspector As Outlook.Inspector
    Dim objWordDocument As Word.Document
    Dim objWordSelection As Word.Selection
 
    Set objCurrentItem = objInspector.CurrentItem
    Set objCurrentInspector = objCurrentItem.GetInspector
    Set objWordDocument = objCurrentInspector.WordEditor
    Set objWordSelection = objWordDocument.Application.Selection
 
    'You change the font as per your preference
    Select Case objCurrentItem.Class
           Case olContact
                With objWordSelection.Font
                     .Name = "Segoe Script"
                     .ColorIndex = wdRed
                     .Size = 8
                     .Bold = True
                End With
           Case olAppointment
                With objWordSelection.Font
                     .Name = "Comic Sans MS"
                     .ColorIndex = wdBlue
                     .Size = 9
                     .Bold = False
                End With
           Case olTask
                With objWordSelection.Font
                     .Name = "MV Boli"
                     .ColorIndex = wdGreen
                     .Size = 10
                     .Bold = True
                End With
   End Select
End Sub

5. Үүний дараа та энэ кодонд гарын үсэг зурах хэрэгтэй.

• Эхлээд VBA төслүүдийн дижитал гэрчилгээг ашиглан дижитал гэрчилгээ үүсгэ.
• Дараа нь энэ гэрчилгээг шинэ макрод онооно.

6. Дараа нь та дижитал гарын үсэг зурсан макрог зөвшөөрөхийн тулд Outlook макро тохиргоогоо өөрчилж болно.
7. Эцэст нь чи Сtart шинэ VBA төслийг идэвхжүүлэхийн тулд Outlook. Одооноос эхлэн таныг шинэ харилцагч, уулзалт эсвэл даалгавар үүсгэх үед бие нь дараах дэлгэцийн агшин шиг өгөгдмөл фонтыг ашиглах болно:

PST мэдээллээ авлигын эсрэг хамгаалаарай

Outlook PST файл нь алдаа, эвдрэлд өртөмтгий байдаг тул та PST хамгаалалтад маш их анхаарал хандуулах хэрэгтэй. Жишээлбэл, үл мэдэгдэх эх сурвалжаас ирсэн имэйлээс болгоомжлох хэрэгтэй, учир нь тэдгээр нь вирус агуулсан хортой имэйл байж болзошгүй. Таны PST файл халдвар авсны дараа та нэр хүндтэй, сайн батлагдсан засварын хэрэгсэлд хандах хэрэгтэй. DataNumen Outlook RepairАль болох засварын газар сэвшээ салхи шиг файл.

Зохиогчийн танилцуулга:

Ширли Жан бол мэдээлэл сэргээх мэргэжилтэн юм DataNumen, Үүнд мэдээлэл сэргээх технологиор дэлхийд тэргүүлэгч, Inc. засах SQL Server програм хангамжийн бүтээгдэхүүнийг засах хэтийн төлөв. Дэлгэрэнгүй мэдээллийг авна уу WWW.datanumen.com