كيف تجعل تنبيهات Outlook تظهر في المقدمة أثناء استخدام الحاسوب؟

بينما تعمل على تطبيقات أو مواقع ويب أخرى وتُصغّر نافذة Outlook، قد تفوتك بعض التنبيهات. فكيف يمكنك ضمان ظهور تنبيهات Outlook دائمًا في مقدمة الشاشة أثناء استخدام الحاسوب، حتى يتسنّى لك إغفالها (dismiss) بسهولة؟ في هذه المقالة، أقدّم لك كود VBA للتعامل مع هذه المشكلة.

اجعل تنبيهات Outlook تظهر في مقدمة الشاشة

---

اجعل تنبيهات Outlook تظهر في مقدمة الشاشة

1. اضغط مفتاحَي «Alt» + "F11" لفتح نافذة «Microsoft Visual Basic for Applications».

2. انقر مرتين على «ThisOutlookSession» في جزء "Project1"، ثم انسخ والصق الكود أدناه في البرنامج النصي.

VBA: التنبيهات تظهر في المقدمة

Private Sub Application_Reminder(ByVal Item As Object)
'UpdatebyExtendoffice20180418
Dim xAppointment As AppointmentItem
If Item.Class = olAppointment Then
    Set xAppointment = Item
    MsgBox xAppointment.Subject, 4096 + vbInformation + vbOKOnly, "Kutools for Outlook"
End If
End Sub

3. احفظ وأغلق نافذة «Microsoft Visual Basic for Applications».

الآن، حتى لو كانت نافذة Outlook مصغَّرة، ستظهر التنبيهات في مقدمة الشاشة أثناء عملك على تطبيقات أخرى.