如何在 Outlook 中始终让提醒窗口显示在所有应用程序的最前端？

默认情况下，Outlook 的提醒窗口会在其他已打开窗口之后弹出，因此在繁忙时，您可能会错过一些重要提醒。为避免遗漏提醒，最有效的方法是让提醒窗口始终置顶显示在所有已打开窗口之上。本文将为您介绍实现这一目标的方法。

使用 VBA 代码让提醒窗口始终置顶显示

---

使用 VBA 代码让提醒窗口始终置顶显示

请使用以下 VBA 代码，使 Outlook 的提醒窗口始终显示在应用程序前端。

1. 在 Outlook 中，按下 Alt+F11 键即可打开 Microsoft Visual Basic for Applications 窗口。

2. 在 Microsoft Visual Basic for Applications 窗口中，双击左侧窗格中的 ThisOutlookSession，即可打开代码窗口，然后将以下代码复制到该窗口中。

VBA 代码：始终将提醒窗口置顶

Private Sub Application_Reminder(ByVal Item As Object)
'Updated by ExtendOffice 20180814
Dim xAppointment As AppointmentItem
If Item.Class = olAppointment Then
    Set xAppointment = Item
    MsgBox xAppointment.Subject, 4096 + vbInformation + vbOKOnly, "Outlook reminders"
End If
End Sub

3. 按下 Alt+Q 键，即可关闭 Microsoft Visual Basic for Applications 窗口。

从现在开始，每当 Outlook 弹出提醒时，Outlook 提醒对话框都会显示在当前使用窗口的最前端。您只需单击确定按钮，即可立即切换到 Outlook 提醒窗口。请参见截图：