The following VBA macro is simply available as a against incorrect email transmission in Outlook365.
Private Sub Application_ItemSend(ByVal Item As Object, Ca