【发布时间】:2018-10-02 08:04:51
【问题描述】:
尝试从 Excel vba 更改 sendTo 收件人,部分代码是:
Set MailDoc = Maildb.GetDocumentByUNID(strMemoUNID)
Set rtiSig = MailDoc.GetFirstItem("Body")
Set rtiNew = MailDoc.CreateRichTextItem("rtiTemp")
Call rtiNew.AppendText(strBody): rtiNew.AddNewLine (1)
strToArray(0) = "aaa@xxx.com"
MailDoc.SendTo = strToArray
MailDoc.CopyTo = strCCArray
MailDoc.BlindCopyTo = strBccArray
MailDoc.subject = strSubject
Call rtiNew.AppendRTItem(rtiSig)
Call MailDoc.RemoveItem("Body")
Set rtitem = MailDoc.CreateRichTextItem("Body")
Call rtitem.AppendRTItem(rtiNew)
MailDoc.Save False, False
Set uiMemo = ws.EditDocument(True, MailDoc)
但只是改变MailDoc.subject
为什么不改变MailDoc.SendTo?
【问题讨论】:
-
我知道,但我需要在这个地方改变
-
在“SendTo”之外设置“EnterSendTo”字段是否有效?
-
是的,现在可以了,请回答
标签: vba excel lotus-notes lotus-domino