お世話になっております。

OutlookのVBAについてです。
メール送信後、送信済フォルダに送信済メールが追加された時に、VBAを実行しようとしておりますが、VBAコードが実行できたり、出来なかったりします。

お手数ですみませんが、対処法のご教授をお願いできますでしょうか。

VBEで、Project1(VBAProject.OTM)の、Microsoft Outlook Objectsの、ThisOutlookSessionに、以下のようなコードを作成しました。


Option ExplictDim WithEvents mySentItems As Items

Private Sub Application_ItemLoad(ByVal Item As Object)

End Sub

Private Sub Application_Startup()
Set mySentItems = Session.GetDefaultFolder(olFolderSentMail).Items
End Sub

Private Sub mySentItems_ItemAdd(ByVal Item As Object)

' 実行したいコード

End Sub


条件は以下です。

Windows10 Pro 21H2(OSビルド 19044.2486)

Outlook : サブスクリプション製品 Microsoft 365 Apps for enterprise


・すべてのマクロを有効にしております。
・Outlookを終了、再起動しても、VBAが実行されない時があります。
・Officeのクイック修復をしても、VBAが実行されない時があります。

何卒宜しくお願い致します。