outlook-2010 - Outlook 電子メール通知 VB コード

Question

このコードを見つけて、会議のリマインダーが現在のすべてのウィンドウを上書きするようにして、通知を強制的に表示するようにしました。メール通知を受け取るたびに、似たようなものを設定したいと思っています。現在は奥に押し込まれて見えません。

Private Sub Application_Reminder(ByVal Item As Object)


If TypeOf Item Is AppointmentItem Then
Application.ActiveExplorer.Activate
End If


End Sub

どんな助けでも大歓迎です。

ここでチュートリアルを見つけました

http://www.darthandy.com/2011/02/how-to-get-outlook-appointment.html