最近写邮件老忘主题，被说2次，都有点不好意思了，所以想了个解决办法

1、outlook中 alt+F11

2、写入下列代码

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)Private Sub