如何让 Outlook 的提醒窗口在电脑使用时始终置顶弹出？

当您在使用其他应用程序或浏览网站，并且已最小化 Outlook 窗口时，可能会错过 Outlook 的部分提醒。那么，如何让 Outlook 的提醒窗口始终置顶弹出，确保您在使用电脑时能够及时处理所有提醒？本文将为您介绍一段 VBA 代码，帮助实现这一功能。

让 Outlook 提醒窗口始终置顶弹出

---

让 Outlook 提醒窗口始终置顶弹出

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

2. 在“Project 1”窗格中，双击“ThisOutlookSession”，然后将以下代码复制并粘贴到脚本中。

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 已最小化，提醒窗口也会始终置顶弹出，让您在使用其他应用时不错过任何提醒。