如何使用vba添加内联pdf文档?

时间:2018-12-31 05:33:35

标签: excel vba outlook outlook-vba

我正在尝试创建带有嵌入式pdf文档的Outlook电子邮件草稿。

我设法使用html img src标签添加了嵌入式图片,但这不适用于文档。我应该修改些什么以添加pdf而不是图像?

我尝试使用该位置,但没有添加正确的位置,而是添加到文本的末尾。

Set outlook = createObject(“Outlook.Application”)
Set mailItem = outlook.CreateItem(olMailItem)

With mailItem
    .BodyFormat = olFormatRichText
    .Body = “hello world”
    .Attachments.add “file.pdf”, olByValue, 6
End With

2 个答案:

答案 0 :(得分:0)

您只能以RTF格式执行此操作,而不能以HTML格式执行。调用MailItem.Attachments.Add时,请适当地指定Position参数。

答案 1 :(得分:0)

似乎add函数仅在调用display之后才起作用,否则只会添加到整个正文的末尾

Set outlook = createObject(“Outlook.Application”)
Set mailItem = outlook.CreateItem(olMailItem)

With mailItem
    .BodyFormat = olFormatRichText
    .Body = “hello world”
    .Display
    .Attachments.add “file.pdf”, olByValue, 6
End With