相关疑难解决方法(0)

我想获得活动打开的MailItem(无论是新邮件还是收到的邮件).当用户运行我的宏时,我需要为该邮件添加一些内容.我正在使用Outlook 2003和VBA.

我发现了这个问题:如何使用VBA在Outlook的当前打开窗口中获取对邮件项的引用？但它不起作用,因为TypeName(Application.ActiveWindow)设置为空.我也试过,Set Mail = Application.ActiveInspector.currentItem但它也不起作用.

关于ActiveInspector的事情,我一定不明白.

根据要求,这是位于专用模块中的过程/宏,当用户单击Application_Startup()方法中添加的菜单按钮时调用:

Sub myMacro()
    Dim NewMail As Outlook.MailItem
    Set NewMail = Application.ActiveInspector.currentItem
End Sub