撰写电子邮件并将信息写入主题行时。
在主题行之外单击后,如何参与主题行并转移到电子邮件的正文中。
例如,下面撰写了一封新电子邮件:
电子邮件标题
致: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产生空白结果。如果我可以将主题行中包含的文本存储到变量中,则可以使用该变量。
答案 0 :(得分:0)
.CreateItem
应该给您提示您创建了一个新的空白邮件。除非您.Display
否则您不会看到此消息,因此您可能会认为自己引用了带有主题的邮件。
请改为使用Set MItem = ActiveInspector.CurrentItem
。