如何将电子邮件的主题存储在变量中?

时间:2018-08-22 04:04:51

标签: vba outlook

撰写电子邮件并将信息写入主题行时。

在主题行之外单击后,如何参与主题行并转移到电子邮件的正文中。

例如,下面撰写了一封新电子邮件:

  

电子邮件标题
  致:Joe Bloggs
  抄送:
  密件副本:
  主题:NZD10000 REF:0000001 2018/08/18

     

身体

     

参考编号: 0000001
  日期: 2018/08/18

     

谢谢。

Public MItem As MailItem
Public MySubject As String

Sub NewSecureMail()

    Set MItem = Application.CreateItem(olMailItem)
    MySubject = MItem.Subject
    MsgBox (MySubject)

End Sub

msgbox产生空白结果。如果我可以将主题行中包含的文本存储到变量中,则可以使用该变量。

1 个答案:

答案 0 :(得分:0)

.CreateItem应该给您提示您创建了一个新的空白邮件。除非您.Display否则您不会看到此消息,因此您可能会认为自己引用了带有主题的邮件。

请改为使用Set MItem = ActiveInspector.CurrentItem