Как настроить напоминания Outlook так, чтобы они всегда отображались поверх других приложений?

По умолчанию окно напоминаний Outlook открывается за другими открытыми окнами, из-за чего в период интенсивной работы вы можете пропустить важные уведомления. Чтобы этого избежать, рекомендуем настроить автоматическое отображение окна напоминаний поверх всех открытых окон. Метод, описанный в этой статье, поможет вам реализовать эту функцию.

Всегда выводить напоминания поверх приложений с помощью кода VBA

---

Всегда выводить напоминания поверх приложений с помощью кода VBA

Чтобы напоминания Outlook всегда отображались поверх других приложений, примените следующий код VBA.

1. В Outlook нажмите клавиши Alt+F11, чтобы открыть окно Microsoft Visual Basic для приложений.

2. В окне Microsoft Visual Basic для приложений дважды щелкните элемент 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 для приложений.

Когда в Outlook появится напоминание, диалоговое окно Напоминания Outlook отобразится поверх текущего активного окна. Чтобы сразу перейти к окну напоминаний Outlook, нажмите кнопку OK. См. снимок экрана: