时间戳

首页 > 解决方案 > 使用文件夹中已保存的电子邮件模板通过 excel 使用 VBA 发送电子邮件？

excel - 使用文件夹中已保存的电子邮件模板通过 excel 使用 VBA 发送电子邮件？

问题描述

我在 excel 中有一个电子邮件列表，我想在 Outlook 中发送已经预制的电子邮件，我已将其保存为文件夹中的模板。而不是尝试通过 VBA 重新创建此电子邮件。我很想知道是否可以将保存的 Outlook 模板发送到每封电子邮件。

标签： excelvbaemailoutlook

解决方案

试试这个模板。您可能希望将电子邮件和内容变量传递给该函数，但听起来您可以使用已有的内容重新配置该部分。

Sub CreateEmailfromTemplate()
    Dim obApp As Application
    Dim NewMail As Outlook.MailItem

    Set obApp = Outlook.Application
    Set NewMail = obApp.CreateItemFromTemplate("C:\directory\Template.oft")
    NewMail.Display
    With NewMail
        .To = "example@mail.com"
        .Display
    End With

    Set obApp = Nothing
    Set NewMail = Nothing
End Sub

推荐阅读